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BY g# 0£ 



100 ■ FINAL FANTASY III 

110 " ?33*' ; t-7 

120 ' (C) SQUARE 

130 CLEAR 1000 

140 _ MUSIC(1, 0, 1, 1. I, I, I, 1) 

150 _ PITCH (443) 

160 DIM A* (15) :DEFSTR A-T 

170 ' 

180 POKE &HFA2C+2*16, 16 



200 

210 

220 

230 

240 

250 

260 

270 

280 

290 

300 

310 

320 

330 

r8. g 

340 

6drl 

350 

6dr1 

360 

r8. g 

370 

<br 

380 

16dr 



FOR W=4 TO 15 

READ X$:AX(W) =VAL ("&h"+X$) .-NEXT W 

_ VOICE COPY (AX. §63) 

DATA 0C00, 000A, 0000. 0000 
DATA 0002. F0FA. 0080, 
DATA 0001, 23F5, 



A0="g4bgfa4agbgbf 4af " 

A1 ="c4gcda4ag>d<g>d<f +>d<d>d<" 

A2="f +>c<e>c<d>c<c>c«a>a>gf +e4d4<" 

B0="rl. r4. r 1 6<a+64b64>c64c+64" 
B1="dr8. <brl6gr16er16>dr!6<br16gr16b 
jr8. b4r8arl6" 

B2="gr16gagrl6fr16g4r8f r16gr16ab>cr1 
6e4r8. <a+64b64>c64c+64" 
B3="grl6gagr16fr16g4r8fr16gr16ab>crl 
6e4r8. c64c+64d64d+64" 
B4="er8. crl 6<ar1 6f + r 16ar1 6>cr 1 6er1 6d 
r8. d4r8<br16>" 

B5="cr8. <ar16f + r1 6drl 6f + r1 6ar1 6>cr1 6 
6b>c<br16ar16b4r8. >c64c+64d64d+64" 
B6="<ar 1 6abar1 6gr 1 6a4r8gr 1 6ar 1 6ab>cr 
16er8. f+4" 



390 B7="112<ggggab-br3rl2ddddef+g>116" 

400 " 

410 C0="r1. r4. r 1 6. <a+64b64>" 

420 Cl="c64c+64dr8. <br1 6gr 1 6er 1 6>dr1 6<br 

16gr16br8. gr8. b4r8ar32" 

430 C2="r32gr16gagrl6fr16g4r8f r16gr!6ab> 

cr16dr16e4r8. <a+64b64> 

440 C3="r32gr16gagr16f rl6g4r8f r16gr16ab> 

cr16dr16e4r8. c64c+64" 

450 C4="d64d+64er8. crl 6<ar1 6f + r16ar1 6>cr 

16er16dr8. gr8. d4r8<br32>" 

460 C5="R32cr8. <ar 1 6f + r1 6dr1 6f + rl 6ar 1 6>c 

r16<br16b>c<br16arl6b4r8. >c64c+64" 

470 C6="R32<arl6abar16gr16a4r8gr16arl6ab 

>cr16dr16er8. f+8. . " 

480 C7="r321 1 2<ggggab-br3r 1 2ddddef +g>l 1 6 

490 ' 

500 D0="r4dr4rl6cr8. cr8. dr8. dr4r16cr8. " 

510 D1="r4cr4r16cr8. cr8. dr8. dr8. dr8. dr16 

520 D2="r8cr8. cr8. cr8. cr8. cr 1 6er1 6drl 6cr 

8. c+4" 

530 ' 

540 E0="r4br4r16ar8. ar8. br8. br4r16ar8. " 

550 El ="r4ar4r1 6ar8. ar8. br8. br8. br8. brl 6 

560 E2="r8ar8. ar8. ar8. ar8. ar!6>cr1 6<brl 6 

ar8. a+4" 

570 ' 

580 F="y21. 194§w64y21. 172§w64y21, 15l§w64 

y21. 1 17§w64y21, 94§w64y21. 72§w64y21, 51§w6 

4y21. 17§w64r8" 

590 F0="r2. y37, 26"+F+"r2. y37. 24" + F 

600 F1="r2. y37, 26"+F+"r2r8y37. 26y21. 1698 

w64y21, 134@w64y21. 1 02§w64y21 . 82§w64r 1 6y3 

7, 24" + F 

610 " 

620 G0="b4h8b8b4r4b8h8b8h8b4r4" 

630 Gl ="b8h8b8h8b4r4b8h8b8h8r4r4" 

640 ' 

650 _ VOICE (§33, §63, §63, §10, §10. §63) 

660 T="tl50":Z=0 

670 PLAY#2. T, T. T. T, T. T. T, T, T. T 

680 PLAY#2. "v!518o3". "v13116o6". "vl0116o 

6". "v12L16o6". *'vl2116o5", "vl5o5". "v15y22 

. 150y24, 131". "v.1 21 1 606", "vl 21 1 6o5", "s018 

o2m5000" 



690 PLAY#2. A0. "". "". D0 


E0. F0. G0 




D0, A0 


700 PLAY#2. A0, B0. C0, D0 


E0, F0. G0 


B0 


D0, A0 


710 PLAY#2. A0, Bl. CI, D0 


E0. F0, G0, 


Bl 


D0. A0 


720 PLAY#2, A0, B2. C2, D0 


E0. F0, G0, 


B2 


D0. A0 


730 PLAY#2, A0, B1.C1, D0 


E0, F0. G0, 


Bl 


D0. A0 


740 PLAY#2, A0. B3. C3. D0 


E0, F0. G0. 


B3 


D0. A0 


750 PLAY#2, Al, B4, C4. D1 


El. F0. G0. 


B4 


Dl. Al 


760 PLAY#2. Al, B5. C5, Dl 


El. F0, G0, 


B5 


Dl. Al 


770 PLAY#2. Al. B4, C4. Dl 


El. F0, G0, 


B4 


Dl, Al 


780 PLAY#2. A2. B6, C6. D2 


E2, F1.G1. 


BB 


D2. A2 


790 PLAY#2. A0, "". "", D0 


E0. F0, G0, 


H H 


D0. A0 


800 PLAY#2. A0. "", "", D0 


E0. F0, G0. 


" " 


D0. A0 


810 IF 2=0 THEN 830 








820 IF Z=l THEN 880 








830 PLAY#2. A0, "", "". D0. 


E0. F0. G0, 




D0. A0 


840 PLAY#2. A0, "", "". D0. 


E0. F0, G0, 


" " 


D0, A0 


850 PLAY#2. A0. B7. C7. D0, 


E0. F0, G0. 


37 


D0, A0 


860 PLAY#2, A0. B7, C7. D0. 


E0. FI.G0. 


B7 


D0. A0 


870 PLAY#2. "'■, "@16v15". 


"§16v12" 


7= 


:GOTO 


690 








880 PLAY#2, "". "§63v13", 


"§63vl0" 


Z=0:GOTO 


690 
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REGRET 

BY #iU B 






'0 ' REGRET 

20 CLEAR 1000 

30 CALL MUSIC (1. 0. I, 1. I, I, 1, 1) 

40 DIM AX (15) 

50 FORI=0TO15 

60 READA$:AX(I) =VAL f&H"+A$) 

70 NEXT 

80 CALL VOICE COPY (AX. §63) 

90 DATA 0000. 000 

100 DATA 0C00. 0001, 

1 10 DATA 7F40, FE80, 



©1990 SQUARE 



100 ^menzz^ 



MUSIC NO KOKORO 



1 20 DATA 0F40, FE80, 0080, 

130 CALL TRANSPOSE (0) 

140 CALL PITCH (443) 

1 50 POKE &HFA7C. 1 2 

160 A1$ = "T180V14L8O3®33C1.D1. El. &E1E4D4 

170 B1$="T180V13L8O6R@0E4EEE4E4E4RE4EEE4 

E4E4RE4EEE4E4E4E4E4EEE4E4E4 

180 CI $="T180V13L8O5R@0B4BBB4B4B4RB4BBB4 

B4B4RB4BBB4B4B4B4B4BBB4B4B4 

190 D 1 $ = " T 1 80V 1 3L8O5R80G4GGG4G4G4RA4AAA4 

A4A4RA4AAG4G4G4G-4G-4G-G-G4G4G4 

200 A2$ = "03C1. D1. El. <B1. 

210 B2$="06RE4EEE4E4E4RE4EEE4E4E4RE4EEE4 

E4E4E4E4E4E-2. 

220 C2$= "05RB4BBB4B4B4RB4BBB4B4B4RB4BBB4 

B4B4B4B4B4A2. 

230 D2$="05RG4GGG4G4G4RA4AAA4A4A4RA4AAG4 

G4G4G-4G-4G-4G-2. 

240 A3$ = "03E2. E-2. D2. D-2. C2. D2. E2. <B4>E- 

4G-4 

250 E3$="T180V12O7L8©63E2. G-2. G2B4A2EG-G 

4. G-E4G-2D4<B1. 

260 B3$="05S14EGB>E<BGE-G-A>E-<AG-DG-A>D 

<AG-D-EA>D-ED-<CEG>C<GE>G1 6G-1 6D<AG-DG-E 

GB>E<BGE-G-B>E-<BG- 

270 C3$ = "05B2. A2. A2. A2. G2. A2. B2. B2. 

280 D3$="05G2. G-2. D2. E2. E2. G-2. G2. G-2. 

290 E4$ = "07E2. G-2. G2B4A2EG-G4. G-E4G-12G1 

2G-12D4<B4>E1. 

300 A4$ = "03E2. E-2. D2. D-2. C2. D2. E2. E4G4B4 

310 B4$="05EGB>E<BGE-G-A>E-<AG-DG-A>D<AG 

-D-EA>D-ED-<CEG>C<GE>G1 6G-1 6D<AG-DG-EGB> 

E<BG>BGE<BGE 

320 C4$="05B2. A2. A2. A2. G2. A2. B2. A4. B4. 

330 D4$ = "05G2. G-2. D2. E2. E2. G-2. G2. G4. G4. 

340 A5$ = "03E2. E-2. D2. D-2. C2. D2. E2. E4E4D4 

350 C5$="05B2. A2. A2. A2. G2. A2. B2. B4B4A4 

360 D5$="05G2. G-2. D2. E2. E2. G-2. G2. G4G4G- 

4 

370 G$="HB4R4SC4":G5$="T180V15"+G$+G$+G$ 

+G$+G$+G$+G$+"HB4SHM4SHM8H8 

380 E6$ = "07§35V14G2G4G4A4B4A2. G-2. RG-4G- 

4G-4G4A4A2B4G2G-4 

390 D6$="07635E2E4E4G-4G4G-2. D2. RE-4E-4E 

-4E4G-4E2E4E2E4 

400 A6$="03C2. C4>C4<C4D2. D4G-4A4<B2. >B2. 

E2. >E4<B4G4 

410 B6$="05616EGB>EGB>E<BGE<BGDG-A>DG-A> 

D<AG-D<AG-B>E-<B>E-<B>E-G-BG-BG-BEGB>EGB 

BGE<BGE 

420 C6$="04816B>EGB>EGBGE<BGE <A>DG-A>DG 

-AG-D<AG-DG-BG-BG-B>E-G-E-G-E-G- <B>EGB> 

EGGE<BGE<B 

430 G$="CB4CB4SH8H8CB4SH4SH4" :G6$-G$+G$+ 

G$+G$ 

440 E7$="07E2. E4B4B4A2. >E-2. El. &E1. 

450 D7$="06B2. B4>G4G4G-2. B2. B1. &B1. 

460 A7$ = "03C2. C4>C4<C4D2. B4G-4E-4E2. E2>E 

4<E4G4B4E4>E4<D4 

470 B7$="05EGB>EGB>E<BGE<BGDG-A>D<A>D<E- 

G-B>E-G-BEG-GEG-GEG-GEG-GEG-GEG-GBGGEE<B 

480 C7$="04B>EGB>EGBGE<BGE<A>DG-AG-A<B>E 

-G-B>E-G-<BB>E<BB>E<BB>E<BB>E<BB>E<BB>E> 

GEE<BBG 

490 G7$=G$+G$+G$+"CB4CB4SH8H8HB4SH8MH8MS 

H8MHS8 

500 E8$ = "07E2. E4B4B4A2. >E-2. El. <A2. B2. 

510 D8$="06B2. B4>G4G4G-2. B2. B1. E2. G-2. 83 

520 A8$="03C2. C4>C4<C4D2. B4G-4E-4E2. E2>E 

4<B2. B2. 69 

530 B8$="05EGB>EGB>E<BGE<BGDG-A>D<A>D<E- 

G-B>E-G-BEG-GEG-GEG-GEG-GE2. G-2. 

540 C8$="04B>EGB>EGBGE<BGE<A>DG-AG-A<B>E 

-G-B>E-G-<BB>E<BB>E<BB>E<BBE>D-2. E-2. S3 

550 G8$=G$+G$+G$ + "SCB2. SCM2. 

560 PLAY#2. A1$, B1$.C1$, D1$, " ".B1$ 

570 PLAY#2. A2$. B2$.C2$. D2$. " ". B2$ 

580 PLAY#2, A3$, B3$, C3$, D3$, E3$, E3$ 

590 PLAY#2. A4$, B4$. C4$. D4$. E4$, E4$ 

600 PLAY#2. A3$. B3$, C3$. D3$. E3$. E3$. G5$ 

610 PLAY#2. A5$. B4$. C5$. D5$. E4$. E4$. G5$ 



620 
630 
640 
650 
660 
670 



711 



PLAY#2, A6$, B6$.C6$ 
PLAY#2, A7$. B7$. C7$ 
PLAY#2. A6$. B6$.C6$ 
PLAY#2, A8$, B8$,C8$ 
PLAY#2, A3$. " ", C3$ 
PLAY#2, A4$, " ", C4$ 
PLAY#2. A3$, " ". C3$ 
PLAY#2. A4$. " \C4$ 
PLAY#2, A1$, B1$.C1$ 
GOTO 700 



D6$, E6$. E6$.G6$ 
D7$, E7$, E7$. G7$ 
D6$, E6$, E6$, G6$ 
D8$, E8$. E8$, G8$ 
D3$, E3$, E3$ 
D4$. E4$, E4$ 
D3$. E3$, E3$ 
D4$. E4$. E4$ 
Dl$, " ". B1$ 



7-k~D.-isv?%m 



ZANAC 

by &m m 

ZANACr®0fc< fcofctfo 



10 CLEAR 1000 

20 _MUSIC(1, 0. 1, I. 1. I, 1, 1) 

30 _BGM(1) :_P ITCH (443) 

40 DEFSTRA-K. T:T="T150 

50 POKE &HFA2D. 0: POKE&HFA3C. 

60 POKE &HFA4D. : POKE&HFA5C. 

70 POKE &HFA6D. 0: POKE&HFA7C. 

80 SOUND 7, 49: SOUND 6, 20 

90 ■ 

100 A0="824 Q8 L16 VI 5 05 A8>D8E8DE8. G8G 

-8D8E1 

110 B0="824 Q8 L16 V10 05 E8 A8B8AB8. >D8 

D-8<A8B1 

120 C0="824 Q8 LI 6 VI 3 03 AAAAAAGGGGGGGG 

GGEEEEEEDDDDDDDDDD 

130 D0="824 Q8 LI 6 VI 2 04 AAAAAAAAAAAAAA 

AAAAAAAAAAAAAAAAAA 

140 E0="853 08 LI 6 VI 2 06 A1E4. D2&D 

150 F0="§53 Q8 L16 VI 2 06 E1D4. G2&D 

160 G0="V0B!H16H16C16H16H16H16 B1H16BIC1 

6H 1 6H 1 6C1 6H I 6H 1 6H 1 6C1 6H 1 6 B ! H32B32BH32B3 

2H 1 6H 1 6C ! S ! H 1 6H 1 6B ! H 1 6B ! H32B32BH32B32H 1 6 

H16H16C!S!H16H16B!H16H16 

170 H0="S1M8000R1R4C2 C4 

180 I0="V10 04 L16 A1E4. D2D 

190 J0="V10 04 L16 E1D4. G2G 

195 ' 

200 A1 ="61404 VI 5 LI 6 A8B8>C8<AB8>C<B8A8 

B8 

210 B1="81403 V15 L16 A8B8>C8<AB8>C<B8A8 

B8 

220 CI ="814 Q4 03 V15 LI 6 AAAAAAAAAAAAAA 

AA 

230 D1="814 Q4 03 V12 L16 EEEEEEEEEEEEEE 

EE 

240 El ="§24 02 Q8 VI 5 LI 6 A4> »E<EEE< < 

A4 >»E<EEE< < 
250 El ="824 03 Q8 VI 5 LI 6 A»ECCA<AAA< A 
»ECCA<AAA 

260 G1="V5B!H 32B32BH32B32CH1 6H1 6 H16H16 
CH16H16 H16H16CH16H16 HI 6B1CH32B32HB32B3 
2 

270 H1="V11L8 R8CR8CR8CR8C 
275 ' 
277 " 

280 A2=">C8D8E8CD8ED8C8D8< 
290 B2=A2 

300 C2=">CCCCCCCCCCCCCCCC< 
310 D 2 = " GGGGGGGGGGGGGGGG 
320 E2="03C4>»G<GGG« C4>»G<GGG« 
330 F2="04C»GEE>C<CCC« C»GEE>C<CCC« 
335 " 

340 A3="04F8G8A8FG8AG8F8G8 
350 B3=A3 
360 C3=">FFFFFFFFFFFFFFFF< 



370 D3=">CCCCCCCCCCCCCCCC< 

380 E3="02F4»»F<FFF<« F4»»F<FFF 

390 F3="03F»»C<AA>F<FFF<« F»»C<AA>F 

<FFF 

395 " 

400 A4="04E8G-8A-8EG-8A-G-8E8G- 

410 B4=A4 

420 C4=">EEEEEEEEEEEEEEEE 

430 D4="BBBBBBBBBBBBBBBB 

440 E4 = "02E4>»E<EEE« E4>»E<EEE 

450 F4 = "03E>»BA-A->E<EEE< «E>» BA-A-> 

E<EEE 

455 ' 

460 A5="L8 EG-A-AB>CDE 

470 B5=A5 

480 C5="EEEEEEEEEEEE 86V15L32Q805 EG-A-A 

B>CDE 

490 D5="BBBBBBBBBBBB 86V15L32Q806 EEG-A- 

AB>CD 

500 G4="V5B!HS!32B32BH32B32CH16H16 SIH16 

H16CH16H16 S!H16H16B!CH16B!H16 S!H16B!S! 

CH32B32HB32B32 

510 H4="R8CR8CR8CL16S1M5000CC8. 

520 I4="V12R2R4L3204 EG-A-AB>CDE 

525 ' 

530 A6="8207V15A1A1 

540 B6=A6 

550 C6="L16A2G2FER16DE2&E4 

560 D6="C2<B2A2&A4<L32FGAB>CDEF< 

570 E6=E1+E1 

580 F6=F1+F1 

590 G6="B!H32B32BH32B32C! 1 6H1 6SIH1 6H1 6B ! 

C ! 1 6B ! H32B32BH32B32H 1 6C ! 1 6H 1 6S ! H 1 6H 1 6C ! 1 

6H16 B!H32B32BH32B32C!16H16S!H16H16B!C! 1 

6B ! H32B32BH32B32H 1 6C ! 1 6H 1 6S ! H 1 6H 1 6C ! 1 6H 1 

6 

600 H6="L4S1M5000 R4CR4C R4CR4C 

610 I6="05L16V12 A2G2FER1 6DE2E4 

620 J6="05C2<B2A2 A4<L32FGAB>CDEF 

625 " 

630 A7=">C1C1" 

640 B7=A7 

650 C7="G2F2E2D4E4 

660 D7 = "»E2D2C2<B4>C4 

670 E7="V9"+E2+E2 

680 F7=F2+F2 

690 G7="B!H32B32BH32B32C! 1 6H1 6S!H 1 6H1 6B! 

CM6BIH32B32BH32B32H16C! 1 6H1 6S !H1 6H1 6C! 1 

6H16 BIH32B32BH32B32C! 1 6H1 6S !H 1 6H 1 6B !C! 1 

6BIH32B32BH32B32H16C! 1 6H 1 6S !H1 6SIH1 6C! 1 6 

H16 

700 H7="L4S1M5000 R4CR4C R4CR4C16C8. 

710 I7="G2F2E2D4E4 

720 J7 = "»E2D2C2<B4>C4 

725 ' 

730 A8="<F1F1 

740 B8=A8 

750 C8="F2E2D2C2 

760 D8="<A2A2A2F3 

770 E8=E3+E3 

780 F8=F3+F3 

790 I8=C8 

800 J8=D8 

805 ' 

810 A9="E1E1 

820 B9=A9 

830 C9="L 1 6<B>C<B>C<B>C<B>C<B>C<fc»C<B>C< 

B>C<B1 

840 D9="L16EFEFEFEFEFEFEFEFE1 

850 I9=E9 

860 J9=D9 

870 E9=E4+E4 

880 F9=F4+F4 

10000 PLAY#2, T, T. T, T, T, T. T, T, T, T 

10010 PLAY#2, A0. B0. C0, D0. E0, F0. G0. H0. 10. 

J0 

10020 PLAY#2. A1.B1.C1.D1. El . Fl . G1 . HI . 1 1 . 

Jl 

10030 PLAY#2. A1.B1.C1.D1, El . Fl , G1 , HI . 1 1 . 

Jl 

PLAY#2. A2. B2, C2. D2. E2. F2. Gl . HI . II. 



©PONY CANYON INC 



^m<nzz^ 101 



J1 

10050 
Jl 



Jl 

10070 

Jl 

1 

Jl 

1 

J4 

10100 

J6 

101 10 

J7 

10120 

J8 

10130 

J9 



PLAY#2. A2, B2, C2. D2. E2. F2. Gl , HI . 
PLAY#2, A3. B3. C3, D3. E3, F3, 61, HI. 
PLAY#2, A3. B3, C3, D3, E3, F3. 61.H1. 
PLAY#2. A4, B4. C4. D4. E4, F4. Gl . HI . 
PLAY#2. A5, B5. C5, D5. E4, F4, G4. H4. 
PLAY#2. A6. B6, C6. D6. E6, F6, G6, H6. 
PLAY#2. A7. B7, C7. D7, E7, F7, G7, H7. 
PLAY#2. A8, B8, C8. D8. E8, F8, G6, H6. 
PLAY#2. A9, B9, C9, D9. E9, F9, G7, H7, 
GOTO 10020 



<r-ix^=L-vy?m 




BY 



&u& d<i:iiMlft0<t:C5«A;/i v . z>-h 



10 CLEAR 5000:CALL MUSIC (1. 0. 2. 1,1,1,1): 

DIM A*(15).A! (15) : KEY3, "LIST 80-190"+CHR 

$(13) 

30 READ A: A! (5) =A*2 

40 FOR 1=0 TO 1 :READ A, B. C, D, E. F, G:A! (8+ 

1*4) = (G*64 + F)*256+E*128+D*64+C*32+B*16+A 

50 READ A, B, C, D:A! (9+1*4) =A*16+B+ (C*16+D 

) *256:NEXT 

80 ' FB 

90 DATA 4 

100 - *** OPERATER *** 

110 " MUL KSL EG PM AM TL 

120 DATA 1. 0, 1, 0, 0, 15 

130 ' KSR AR DR SL RR 

140 DATA 0, 10. 0, 0, 

150 ' *** OPERATER 1 *** 

160 ' MUL KSL EG PM AM TL 

170 DATA I, 0. 0, 0, 0, 

180 ' KSR AR DR SL RR 

190 DATA 0, 15, 6, 2, 3 

200 FOR 1=0 TO 15:A*(I)=VAL ("&H"+HEX$ (A! 

(I))) :NEXT 

210 CALL VOICE {AH. AH, 833, §0. 80. AH) 

220 'PLAY#2. "", "". "", "OC1", "OG1":END 

230 DEFSTR A-Z: SOUND 6. 3: SOUND 7, 177:POK 

E &HFA3C, 9 

240 T="T1 50" : PLAY#2, T. T. T, T. T. T, T, T. T 

250 A1="O5L16Q":B1="O3L16QV10":C1="O5L16 

Q":D1="O3L16QV6":E1="O5L16QV0":F1="V08A1 

5":X1="L64":Y1="L6403":Z1="L16V905" 

260 A2="V9E-8C8V1 E-8C8V0E-8C8V9<FGA-B->C 
8<B-CE-FGE-D8<B->CGE-B-G" 

261 B2="C8CCC8CCC8CCC8CC<A-8A-A-A-8A-A-B 
-8B-B-B-8B-B-" 

262 C2="V5C8<G8V0>C8<G8>C8<G8V5GGGGA-8A- 
A-R8E-8B-8B-B-F8D8" 

264 E2="R1 6E-8C8E-8C8E-8C8<FGA-B->C8<B-C 
E-FGE-D8<B->CGE-B-" 

265 F="B!H8H16H16":F0="B!H8C!8":F2=F+F+F 
+F+F+F0+F+F 

266 X="RV13CV1 1CV1 0CV9CVC32V7C32R8" :X2=X 
+X+X+X 

268 Z2="CE-G>C<GE-CE-CE-G>C<GE-CE-<A->CE 

-A>C<A-E-C<B->DFB->D<B-FD" 

270 A3 = ">C4. DE-D8C4<A-B->C8CDE-FGFE-DC4< 



GY16, 52Y17, 518W16>" 

271 B3=">C8CCC8CCC8CCC8CCE-8E-E-E-8E-E-< 
B-8B-B-B-8B-B->" 

272 C3="G4. A-B-A-8G4. E-4GA-B-GA-GF4. >" 

274 E3="G16>C4. DE-D8C4<A-B->C8CDE-FGFE-D 
C4<G>" 

275 F3=F+F+F+F+F0+F+F+F 

276 X3=X+X+X 

277 Y="V14AV12GV1 1 FV1 0E-" : Y3="R1 RRR"+Y+Y 
+Y 

278 Z3="CE-G>C<GE-CE-CE-G>C<GE-CE-E-GB-> 
E-GB-G-E-B-FD<B-FB->D<B-" 

300 A4 = "Y5. 38C2Y5, 246E-8C8V1 E-8C8V9E-CR1 

6V4E-CR16E-CV9E-CR16V4E-CR16E-C" 

302 C4="L8<GGGGGGGGA-A-A-A-B-B-B-B-L16" 

304 E4 = "R4. . E-8C8E-8C8E-CR16E-CR16E-CE-C 
R16E-CR16E-" 

305 F4=F+F+F+F+F+F+F0+F 

306 X4=X+X+X 

307 Y4="R1R2R8"+Y+"R16"+Y+"R16"+Y 

308 Z4 = "'CE-G>C<CE-G>C<CE-G>C<CE-G>C«A-> 
CE-A<A->CE-A-<B->DFB-<B->DFB-" 

310 A5="V9GFE-R16V4GFE-DV9A-GFR16V4A-GFB 
-V9B-32Y16. 61Y17, 608W32Y16, 71Y17. 708W32Y 
16, 81Y17, 808W32YI6. 90Y17. 898W2. . " 
312 C5=">CCCR16RCCCR16RE-2D2" 

314 E5="CGFE-R16GFE-DA-GFR16A-GFB-8>C2<" 

315 F5=F+F+F0+F+F+F+"V15B16B16B16816B8B1 
6B16V0" 

316 X0="V13CV11CV10CV9C":X5=X+"R2"+X+X0+ 
X0+X0+X0+X0+"V8C32V7C32"+X0 

317 Y5="R2R8"+Y+"R16"+Y+"R16"+Y 

318 Z5="CE-G>C<CE-G>C<CE-G>C<CE-G>C<E-GB 
->E-<GB->E-G<B->DFB-DFB->D«" 

1250 PLAY#2, A1. B1. CI. D.I, El, F1, XI, Y1. Z1 
1 260 PLAY#2. A2, B2. C2, B2, E2, F2, X2, Y2, Z2 
1270 PLAY#2. A3, B3, C3. B3. E3, F2. X2, Y2, Z3 
1280 PLAY#2, A2. B2, C2. B2. E2, F2. X2. Y2, Z2 
1290 PLAY#2, A3, B3, C3, B3, E3, F3. X3. Y3, Z3 
1300 PLAY#2, A4. B2, C4. B4. E4, F4. X4. Y4, Z4 
1310 PLAY#2. A5, B3, C5, B5. E5, F5, X5, Y5, Z5 
1320 GOTO 1260 



W&TMtn 



Funkey Hoggee 

BY ft\u%m 






10 _MUSIC(1. 0, 2. 1, 1, 2) :POKE&HFA2C, 198:PO 
KE&HFA+64. 34 : T$ = "T1 50V1 5" : PLAY#2. T$. T$. T 
$. T$, T$, T$. T$:SOUND6. 0:SOUND7. &HAB:PLAY" 
S", "02SM1234": "SOUND7, &B 1000 1001 

1 1 AA$="§39V15L1602A8>Q3AA<QA8>Q3AA<QA8> 
Q3AA<QA8>Q3AA<Q" :AA$=AA$+AA$ 

1 2 AB$="F8>Q3FF<QF8>Q3FF<QF8>Q3FF<QF8>Q3 
FF<QG8>03GG<QG8>03GG<QG8>Q3G+G+<QG+8>Q3G 
+G+<Q 

13 A1$ = "BH! 16H! 1 6H ! 1 6H! 1 6SBMH! 1 6H ! 16HM6 
H ! 1 6BH 1 1 6H ! 1 6BH I 1 6H ! 1 6SBMH ! 1 6H ! 1 6H ! 1 6H ! 1 
6BH ! 1 6H ! 1 6H ! 1 6H ! 1 6SBMH ! 1 6H ! 1 6H ! 1 6H ! 1 6BH ! 
1 6H ! 1 6BH I 1 6H ! 1 6SBMH ! 1 6H ! 1 6H ! 1 6BH ! 1 6" 

14 A$ = "L8C4C4CCC4C4C4CCC. CI 6" : A3$ = "L8RC 
R8RCR8RCR8RC 

15 A4$ = "BH! 16H! 16H! 16H! 1 6SBMH ! 16H! 16H! 16 
H ! 1 6BH ! 1 6H ! 1 6BH ! 1 6H ! 1 6SBMH ! 1 6H ! 1 6H ! 1 6H ! 1 
6BH ! 1 6H 1 1 6H I 1 6H ! 1 6SBMH ! 1 6H ! 1 6H ! 1 6H ! 1 6BH ! 
1 6H 1 1 6BH ! 1 6H I 1 6SBMH ! 1 6H ! 1 6SBM1 6SBM1 6" 

16 A5 $ = " L 8C4C4CCC4C4C4CCCC 1 6C 1 6 " : A6 $ = " L 8 
RCR8RCR8RCR8RCC1 6C1 6 

17 A7$ = "BH ! 1 6H ! 1 6H ! 1 6H ! 1 6SBMH ! 1 6H ! 1 6H ! 1 6 
H ! 1 6BH ! 1 6H ! 1 6BH M 6H ! 1 6SBMH ! 1 6H ! 1 6H ! 1 6H ! 1 



160 PLAY#2. "". 
R8AAAAR8AAAA" 



6BH ! 1 6H ! 1 6H ! 1 6H ! 1 6SBMH ! 1 6H ! 1 6H ! 1 6H ! 1 6BH ! 
1 6H ! 1 6SBM1 6SBM1 6SBM1 6SBM1 6SBM1 6SBM1 6" 

18 A8$="L8C4C4CCC4C4C4CL16CCCCCC":A9$="L 
8RCR8RCR8RCR8R8L 1 6CCCCCC 

19 B1$ = "BH!16H! 1 6H ! 16H! 1 6SBMH! 16HM6H! 16 
H ! 1 6BH ! 1 6H ! 1 6BH II 6H ! 1 6SBMH ! 1 6H ! 1 6H ! 1 6H ! 1 
6BH ! 1 6H ! 1 6H ! 1 6H ! 1 6SBMH ! 1 6H ! 1 6H ! 1 6H ! 1 6BH ! 
1 6H ! 1 6BH ! 1 6SBM1 6SBM8SBM1 6SBM1 6 

20 B2$="L8C4C4CCC4C4C4CL16CCC8CC" :B3$="L 
8RCR8RCR8RCR8R8. C16CC16C16 

21 C1$ = "V156A0BH!6H!12BH!6HM2BH!6SBM24S 
BMSBM24SBM6SBM 12 BH ! 6BH ! 1 2H ! 6BH ! 1 2BH ! 6SB 
M32SBM32SBM32SBM6SBM12":C2$="LCCC6C24C24 
C6C12 B6B4B12B6L32CCCC6C12":C3$="RRR6C24 
C24C6C1 2RRR6C32C32C32C6C1 2" 

22 BD$="LCCC8. L 1 6CCCCCCCCC" 

100 PLAY#2, "". "". "\AA$. "8A0B4B4B4B4B4B4 

B4CMB4". "LCCCCCCCC 

110 PLAY#2. "", "", "",AB$. "CMIB4B4B4B4B4B4 

B4CMIB4". "LCCCCCCCC 

120 PLAY#2, "", "". "".AA$. "CMIB4B4B4B4B4B4 

B4CMIB4", "LCCCCCCCC 

130 PLAY#2, "",""; "", AB$. "CMIB4B4BH !8H !8B 

H ! 8H ! 8BH I 1 6H ! 1 6H ! 1 6H ! 1 6BH ! 1 6H ! 1 6H ! 1 6H ! 1 6 

BH! 16HI16H116H! 16CMIBHM6H! 1 6H ! 1 6SBM16". 

" LCCCCCCCC8. C16", "R1R2RR8. C16 

140 PLAY#2, "". "86Q606R8L16AAAAR8AR8AR8AA 

R8AAAAR8AAAA". "LI 6R886Q606FFFFR8FR8FR8F 
F R8FFFFR8FFFF", AA$. A1$, A2S, A3$ 
150 PLAY#2, "". "R8FFFFR8FR8FR8FF R8GGR16G 
R16G R8G+G+R16G+R16G+". "R8DDDDR8DR8DR8DD 

R8DDR16DR16D R8D+D+R1 6D+R1 6D+". AB$. A4$. 
A5$. A6$ 

'86Q606R8L 1 6AAAAR8AR8AR8AA 
"LI 6R886Q606FFFFR8FR8FR8F 
F R8FFFFR8FFFF". AA$. A1$, A2$, A3$ 
170 PLAY#2, "". "R8FFFFR8FR8FR8FF R8GGR16G 
R16G R8G+G+R16G+8. ". "R8DDDDR8DR8DR8DD R8 
DDR16DR16D R8D+D+R1 6D+8. ". AB$, A7$. A8$. A9 
$ 

180 ' MAIN 

190 PLAY#2. "80O7L16E-R16AR16A4E-R16AR16A 
4B->C<B-AGR16G-R16E4", "0589QL2E-E-B-A4E4 
". "89Q05L2CCGF4C4". AAS.'AI $, A2$. A3$ 
200 PLAY#2, ">C8. D-C8. D-DR1 6BR1 6A#4C8. D-C 
8. D-DR16A+32B32R16A#4". "CDOD", "FEFB",AB 
$. B1$, B2$. B3$ 

210 PLAY#2. "L16D4D8. CE-R1 6DR1 6CR1 6<BR1 6> 
CDCDCR16<B-R16G4", "<DE-CG+", "FGE1",AA$, A 
1$, A2$. A3$ 

220 PLAY#2, "F4F8. E-GR1 6Q4FFFFFFFFFF", "F- 
G+4L 1 6G+Q3G+G+G+G+G+G+G+ ". "DE-4L 1 6E-Q3E- 
E-E-E-E-E-E-". "F8>Q3FF<QF8>Q3FF<QG8>Q3GG 
<G+G+G+G+G+G+G+G+". "CB16H! 16H! 1 6H ! 1 6SBMH 
! 1 6H ! 1 6H ! 1 6H ! 1 6BH ! 8BH ! 1 6BH ! 1 6BH ! 1 6BH 1 1 6B 
H!16BH!16BH!16BH!16BH!16BH!16", BD$. "RC 
230 PLAY#2. "Q", "Q84905LE-E-E-&E-6F1 2G-6F 
32F32F32E-6G- 1 2B-6B- 1 2B-6B- 1 2" . "Q849L0D- 
6D- 1 2D-6A- 1 2B-6B32B32B32B-6A- 1 2B-6B1 2B-6 

A-12B-6A-12G-6F12". "849Q03L1 2E-6E-E-6E- 
E-6E-E-6E- E-6E-E-6E-E-6E-E-6E-", CI $, C2$ 
.C3$ 

240 PLAY#2. "". "", "". "".C1$, C2$, C3$:PLAY# 
2. "". "". "". "LQ4e3902Q2AAAAFFF+QL16F+8>Q3 
F+F+", "BC8H ! 8BH ! 8H ! 8BH !'8H ! 8BH ! 8H ! 8BH ! 8H ! 
8BH!8H!8BH!8H!8BH!8SBM8", "LCCCCCCCC8C8", 
"R1R2RR8L8C" 

250 PLAY#2, "". "", "", "02Q"+AB$, "BHI8HI16H 
! 1 6BH ! 8H ! 8 BH ! 8BH ! 1 6H ! 1 6BH ! 8H ! 8 BH ! 8H ! 1 6 
H!16BH!8H!8 BH! 16BH! 1 6SBM1 6SBM1 6SBM1 6SBM 
16SBM16SBM16". " LCCC8C8CCCL 1 6CCCCCCCC", "R 
1RRR8L16CCCCCC" 

260 'PLAY#2, "". "". "". AA$, A1$. A2$. A3$ 
270 "PLAY#2. "", "". "". AB$, A7$, A8$. A9$ 
280 PLAY#2. "", "", "", AA$, A1$, A2$.A3$ 
290 PLAY#2, "", "", "". "02F8>Q3FFQ<F8>Q3FF< 
04 {FFF} 8FFFFFQF8>Q3FF<Q", "BH ! 1 6H ! 1 6H ! 1 6H 
! 1 6SBMH ! 1 6H ! 1 6H ! 1 6H ! 1 6BH ! 24BH ! 24BH ! 24BH ! 
1 6BH ! 1 6BH ! 1 6BH ! 1 6BH ! 1 6SBM1 6H ! 1 6H ! 1 6H ! 1 6" 
, "LCCC24C24C24L16CCCCCLC". "L8RCRRR16C 
300 PLAY#2, "". "8605L16Q5FFFFF8F8Q6G8L16G 



102 ^3i<nzz?> 



MUSIC NO KOKORO 



2GG8G" . "8605Q5L 1 6DDDDD8D806E8L 1 6EEEE8E". 
'Q5L I 6FFFFF8F80F+8>Q3F+F+<QG8>03GG<Q". "B 
1 I 1 6BH ! 1 6BH ! 1 6BH ! 1 6BH ! 8BH ! 8BH II 6H ! 1 6H ! 1 6 
1I16SBMH! 16HM6HI16H! 16", "L 1 6CCCCC8C8LCC 
', "R2RCR8" 
510 GOTO160 



iTryswwBn 



MADY 

by mmm? 



£C2Kffi®»H«#UU<D*fo 



100 _MUSIC(0, 0. 1. I. 1. 1, 1. 1. i, i. D 

I 1 P0KE&HFA4C. 30 : POKE&HFA6C, 20 : POKE&HFA 

3C. 20 

120 A1$="80T130V10O4L4AA>D<AA>D<AA>D<AA> 

) 

130 A2$="80T130V8O4R8L4E>E<BE>E<BE>E<BE> 

:<B8 

140 B1$ = "T130A2>E4D2<B4>L2C. <A. >EG4F+2D4 

I&E1 

I 50 A3$="80T1 30V1 502A1 &A4&A8A8A1 &A2 

160 B2$="§0O4L4AA>D<AA>D<AA>D<AA>DCCFCCF 

cAA>D<AA>D 

I 70 B3$="80O4R8L4E>E<BE>E<BE>E<BE>E<BG>G 

)<G>GD<E>E<BE>E<B8& 

180 B4$="80O2A1&A4&A8A8A1&A2O3C1&C4&C8O2 

\8A1&A2 

190 CI $="A2A4G2E4L2D. <B. A2>L4C<BAGA1 8A2 

200 C2$="04L4FFAFFABB>D<BB>D<AA>D<GGBAA> 

)<AA>D 

210 C3$="04B8L4C>C<FC>C<FG>G<BG>G<BE>E<B 

)>D<GE>E<BE>E<B8 

220 C4 $ = " 02A 1 &A4&A8G8G 1 & L 2GA. G. A&A4 

230 C5$="816T130R1R1R1R1R1R2R8V10O4L8B>D 

: V13 

240 C6$="816T130R1R1R1R1R1R2R8R16V10O5L8 

iEG16V13 

250 Dl$="V5e2204L12AAAAAAAAAAAAAAAAAAAAA 

^AAAAAAAAAAAAAA>CCCCCCCCCCCCCCCCCCCCCCCC 

XCCCCCCCCCC 

260 E1$="04AAAAAAAAAAAAAAAAAABBBBBBBBBBB 

3BBBBBBAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 

\AA 

270 D2$="T130V4822O4L12EEEEEEEEEEEEEEEEE 

EEEEEEEEEEEEEEEEEEEAAAAAAAAAAAAAAAAAAAAA 

\AAAAAAAAAAAAAA 

280 E2$="FFFFFFFFFFFFFFFFFFGGGGGGGGGGGGG 

3GGGGEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE 

290 E3$="822T1 30V5R1 Rl Rl Rl Rl R405L4EFG 
300 Fl $="822V805L2A. G. E. &E. A. L4BAGL2E. &E 

310 F2$="05V12L8FFFFFFGGGGGGCCCCCCCCCCCC 
: F F F F F GGGGGGCCCCCCCCCCCC 
320 F3$="05V1 1R16L8CCCCCCDDDDDD<GGGGGGGG 
3GGG>CCCCCCDDDDDD<GGGGGGGGGGGG 1 6& 
330 F4$="81 202L2A. B. >C. &C. <A. B. >C. &C. 
340 F5$ = "§14V10R1R1R4O5L4CDEL2F. GD4E. L4E 
: . G8 

350 Gl $ = "A2. L4BAB>C2<BL2A. A. >D. <B. &B. 
360 G2$="FFFFFFGGGGGG>CCCCCC<AAAAAAD+D+D 
fD+D+D+D+D+D+D+D+D+G+G+G+G+G+G+G+G+G+G+G 
fG+ 

370 G3$="G1 6CCCCCCDDDDDDEEEEEECCCCCCCCCC 
XCCCCCCEEEEEEEEEEEE1 6 
380 G4$ = "02A. B. >C. <A. >D+. &D+. E. &E. 
390 G5$ = "L2F. D. E. C. &D+. A. G+. 05G+. A. B. 61 4 
34V 10 

U00 G6$="822V10O5R2R4L4GFGG2G+L2A. A. A. G+ 
&G+. 



410 H1$="§1405V13A4L8>ED+L4EDC<B>CL8<AB> 

CDL4ED+EE<L8G>CEGF+2L4DEL8ED+L4EEC<G 

420 1 1 $ = "A2A4G2E4L2D. <B. &B. Tl 20A2>L4C<BA 

GA1&A2 

430 I2$="04L4FFAFFABB>D<BB>D&D2. T120<AA> 

D<GGBAA>D<AA>D<AA>D<AA>DKL2A. &A. 

440 I3$="04B8L4C>C<FC>C<FG>G<BG>G<B&B2. T 

120E>E<BD>D<GE>E<BE>E<BE>E<BE>E2<B1 

450 I4$="02A1&A4&A8G8G1&L2G&G. T120A. G. A& 

A4 

460 J2$="FFFFFFFFFFFFFFFFFFGGGGGGGGGGGGG 

GGGGG&G2. 

470 J1$="04AAAAAAAAAAAAAAAAAABBBBBBBBBBB 



480 J3$="06A4L8FGAB>L4C<ABBL8GAB>CL4DC<B 

&L2B. T120A. G. A. 

490 PLAY#2, Al $, A2S, A3$. A3S. "81 404V8". "81 

404 V8" 

500 PLAY#2. B2$, B3$. B4$, B4$. Bl $, Bl $ 

510 PLAY#2. C2$. C3$. C4$, C4S. CI S, CI $. C5S, C 

6$ 

520 PLAY#2, B2$. B3$, B4$, B4$, Dl$. "",B1$, Bl 

$.D2$ 

530 PLAY#2. C2$, C3$, C4$. C4$. El$. E3$. Cl$, C 

1$. E2$ 

540 PLAY#2, F2$. F3$, F4$, F4$. Fl $, Fl $. F5$. F 

5$ 

550 PLAY#2. G2$. G3$. G4$, G4$, Gl $, Gl $. G5$. G 

5$, G6$ 

560 PLAY#2. B2$. B3$, B4$, B4$. D.l $, Hl$, Bl$, B 

1$, D2$ 

570 PLAY#2. 12$, 13$, 14$. 14$. Jl$. J3$. 11$. I 

1$. J2$ 



?-li^3.-VvOW^ 



WO?407J±\ 

by &m&m- 

<m^>zi\z. m\zzm$$ft&i\, psg© 



5 COLOR 7, 0, 7 
10 CALL MUSICO.0, 1. 1. I. 
20 CALL VOICE (8 0, 833. 81 
30 T=150:PLAY#2. 



4, 830, 830. 8 0) 



"V 05Q L8 T=T:" 


"V 03Q7L16T=T; 


"V 06Q L4 T=T;" 


"V1207Q L4 T=T; 


"VI 103Q7L4 T=T;" 


"V7 050 L8 T=T; 


"V T=T;" 


"V 05 L8 T=T; 


"V L8 T=T;" 


"V L8 T=T: 


TRANSPOSE ( 0) 





101 Al$ = " D. D-. <B. B. B>D- D. D-. <B. B. B>D- 

102 A2$ = ">D. D-. <B. B. B>D- D. D-. <B. B. B>D- 
< 

200 

201 B1$="G8>GG<G8>GG<G8>GG<G8>GG< G8>GG 
<G8>GG<G8>GG<G8>GG< 

202 B2$="A8>AA<A8>AA<A8>AA<A8>AA< A8>AA 
<A8>AA<A8>AA<A>A<A>A< 

300 ' 

301 C1$="GGGGGGGG 

302 C2$= CIS 

400 ' 

401 D1$ = "RCRCRCRC8. <A16> 

402 D2$ = "V15RCRCRC8. C16RL16 CCCC LV12 

500 " 

501 E1$ = "RCRCRCRC8. <A16> 

502 E2$ = "RCRCRC8. C16R V5L16 CCCC LV1 1 

600 " 

601 Fl $ = "B. G. G. G. GG B. G. G. G. GG 

602 F2$ = "A. A. E. E. EA A. A. E. E. EA 



700 ' 

701 G1$="CIHB!8H16H16HSM8H16HB! 16HBI8HB 
M6H16HSM8HBM6H16 

HB ! 8H 1 6H 1 6HSM8H 1 6HB ! 1 6HB I 8HB 
M6H16HSM8HBI 16H16 

702 G2$=" HBI8H16H16HSM8H16HB! 16HBI8HB 
M6H16HSM8HBM6H16 

HB ! 8H 1 6H 1 6HSM8H 1 6HB II 6HB I 8HB 
! 16H16HS16S16HBIM16H16 



801 H1$="S1M11| 

802 H2$=" 
<C16<C16<C16 



R8CR8<C>R1 6CC 1 6<C4> 
R8CR8<C>R1 6CC1 6<C4> 
R8CR8<OR16CC16<C4> 
R8CR8<C>R16CC16 >»C16 



901 I1$="S1M1100 L8 05G07G08G05G04G06GO 
7G05G08G04G07G04G07G08G05G07G 

902 I2$="S1M1100 R1RR8 L I 604A03A02A04A 
1 A03A04A03A07A08A 

1001 ' 
1200 ' 

1203 B3$="G4RRR8G8G4RRR8G8 

1204 B4$="A4RRR8A8A4RRR8A8 

1205 B5$= B3$ 

1206 B 6 $ = " A4 A4A4A4A8A8A8A8A8A8 A8A8 
1300 " 

1305 C5$ = "L8R31»D. D-. <B. B. B>D- D. D-. <B 
. B. B>D-64 L« 

1306 C6$= C5$ 
1400 ' 

1405 D5$=" 

1406 D6$="RRRRRRRC16CI6C8 
1700 ' 

1703 G3$="B4RRR8B8 B4RRR8B8 

1704 G4$="B4RRR8B8 B4RB4S8B8 

1705 G5$= G3$ 

1706 G6$ = "B4B4B4B8. B16 BH8H16H16 BSH8HI 
6H16 BH8H16H16 HBS ! 1 6HS ! 1 6HM! 1 6H1 6 
1900 ' 

1991 S3$="V120L64 R1RR8 08C<BAGFEDC< 
BAGFEDC<BAGFEDC<BAGFEDC<BAG V05L8 

1992 S4$="V120L64 Rl RR8R1 608C<BAGFEDC< 
BAGFEDC<BAGFEDC<BAGFEDC<BAG VO L8 

1993 S5$="V12L64R1RR802CDEFGAB>CDEFGAB> 
CDEFGAB>CDEFGAB>CDEFGAB VO L8 



Fl$. G3$ 
F2$.G4$ 
Fl$, G5$ 
F2$. G6$ 



4991 
4992 
4993 
4994 



GOTO 5010 
5010 PLAY#2, Al$, B3$, " ". " ". 
. " ". Fl$, " " 

5020 PLAY#2. Al$. B4$. " ". " ", 
, " ". F2$, " " 

5030 PLAY#2. A2$, B5$, C5$, " ", 
. " ",F1$. " " 

5040 PLAY#2. A2$, B6$. C6$, D6$, 
. S3$. S4$, S5$ 

5100 

51 10 PLAY#2, Al$, Bl$. " ", Dl$. El$. Fl$. Gl$ 

. HIS. Fl$. " " 

5120 PLAY#2. A1S. B2$, " ", D2S. E2S. F2$. G2S 

. H2S. F2$. 12$ 

5130 PLAY#2. A2$, Bl $. CI $, Dl $. El $, Fl $. Gl $ 

. Hl$, Fl$. " " 

5140 PLAY#2. A2$, B2S, C2S. D2S. E2$. F2S, G2$ 

. H2$. F2$. 12$ 

5200 

5210 PLAY#2, A1S. BIS. " ", Dl $, El $. F 1 $. Gl $ 

. Hl$. Fl$. 11$ 

5220 PLAY#2, Al$. B2S. " ", D2S, E2$, F2$. G2$ 

. H2S. F2S. 12$ 

5230 PLAY#2, A2S. Bl $. CI $, Dl $. El $. Fl $. Gl $ 

. HIS. F1S, 11$ 

5240 PLAY#2. A2S, B2$, C2S, D2$, E2$, F2S, G2S 

. H2$, F2$. 12$ 

6000 GOTO 51 10 

9901 ' Thama From EAGLE SABU 

9902 ' J. Satatani '90. 8 
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Part 2 



& turbo R 



MSX turbo R^mcom.mt, ■£&-D<±mi,lt)(D*$ 

iSo zsXTA*yysmQ(DMm s e>. *mzpmn 

nfcB*ISMSX-DOS2. ZlsZtttzlzmUt-tltz 
(D^a&^UrOX turbo R<D*a*«-DriK*o 

MSX turbo R 

turbo R<DtomH&*nt*mfrrTr9-*)b71- l J2/ 
Zo #l§]ttR800CPU<!:£fcCifll*fcnfc. S/7tA 
*y?0S199OEOlvaHtt«o CPUUDCmfcCX 



mmtzoizz>iz 



#(2 MSX turbo ROUTturbo R)fZ 
(i 1 rnzmr K ix *' <** £ t-*— * 

/TC&c&U* ^Zt::CPUCOR800£ 
Z80\ $b(Z(iS1990'>^r-A^-y 
•713W&Z tiX H -5 £ ggftl L T ^ 
fc L**U !£«££•*# L Til 
^tzlfe^ turbo RCO/ v-K'JiT 
fltfiftilS] 1 C75J; n C«CoTt\*C 

£-f *TC9769" I J, Sl&fcjt 

£T a £ m^^(7) cmos -lsi ds 

•^'IMI^COt-'v ? JULSICO— m)o 
—tikiz *MSX-Engine* t WtHZs 

zsou&co cpu t > psgm& £* 
*.£. < eLsib u\, feCR le*^ 

T*Z80£ U-9 SIB*<WT # fc%& 

OTT-5/ciO<7V <*/<•;/ 7 r— o 
*0PLL*(2FM^)1 V TDC"(i7P 
•y fcf— tV 7.9 U > h P— 7— CO 

Z t tz $. tz *SRAM* 1 1 * -5 C0( i % 



tw^t, RSOO^^-r >RAM 
t J N S1 990^- £ to L T / ** (fflTit 

*l& R800*rVDP£j£fFt5t# 
ft£*tt:, S1990A<ft#£tftftHU ? 
«b IZ'Jl^lZjSUT R800C? x -f 
h Mt£to T s fg^CO ? -f 5 > 
?'£Z80©ff -*§-©? -f 5 >?*(!-£ 
*>"t*-**ft£fi*j:7o JSI-Z80** 
X<>RftM&tt')&£&. S1990 
£R80Wff^-£+mU **U-— 

turbo MK ^Ltzffimmst 

-F^i7fV7 tomtom. 

$ X Z COct 1 G* turbo RCOg|5 B a q 

,S3fti;Ki:^ttft£\ WrtSBto 

MHz* £b(ZS1 990(21 60 fc°>CO 
777 h/f'vir- vT\ ^i§CO¥ 

f^m l&\> mil [PFSffifco 







^M^ 



MSX turbo R©2/X^ASfiE 



ROM 



h- 



r 



3.5inch 

Floppy 



MSX 



turbo R0A-K5i7ifiE 

®*ic^t>ur^fc ^fUSii 
^Sz^ha-Jl/TSx VDP© 

V9958*»6©aiABbr?7re^Cx 

*©T©TC9769(Z80«fcfc2/ 



Bit, +-7K-K<t^a-fXx^ 
^'^<!:«L^rL^*o*fc^73A»&© 

MIX©ffi7Dtt7r— r -1- ^fi^i 



104 *— ^ If -V h MSX turbo R 



® 



7T— ;u if ^s^turbo R 



frU MSX©73— h 'J'yy^P-y 
Mi^©**/^^ iM^fc 
MSXli/ v— K 9 1 7 AF1©iW;fe 
himiztzhio 

RV5/>©R0M«^ 

turbo RlIte^<©ROM;!ri*]/ic 
$*VZ^Z>t,ZttzMnt\ *\4z* 

fcl\ ^-©IIfi£\ S1990^#O^ 
7/R0M$itf»&f;: o 

MSX2+CIt2, H2<7)_bi|IJc7)J; 
-5 4'ROM^F*9lt?tlTl^o >-f 
>ROMt +r:/R0Mte:SlK©7. P 
-y MC&ij^ft, ;i^ROM(il/0 
*-M3«£ftS©T\ 1=rlt© 
^Ml^^^^'b-fs giK©ROMT* 

32*n/\*f h<7)R0M^-4'f®^9J: 
UfcJ28*P'\*-f r-©ROM£H® 

^ C Tturbo RT*(i, M 2 ©T$ IJ 
©J:-)^ HH(7) 51 2+ P/\*< h© 
ROM(Z N *-f> % VTfs OPLLKv 

-f/\*- N Doatsi **».!£ 2 



ffgfr 



MSX turbo RZTOROM«iaa«{b 



>MSX2+0)*I£i 



Z8 



^-f V 



fa-f- 



■9-7' 



7*3-^- 



* 1 **£^ 



»2*i»»^ 



32*3/</f h 



32*n/t.< J. 



32*nA/f J. 



32*n/<^ h 



>MSX turbo R0J 



>□ 



R8 00 



S 1 9 90 



Z8 



±©EI©d^lc, turbo RK:B:'J>»©*8» 
ROM*V3K*tirL^So tttU!*&CPltt x 6[& 

©ROMtfg^tsnrLA§cfc-5izHx.5o cn^Ri 
mzUdntfi'Ta-L&irJto s 1 99or , rsoo^ 

ROM£7 7 £1z3. , r53<!:C&5tol:ra!o 



-7-7- 

OPLL K7-YA- 
DOS 

si**** 




512 + nA-f h 



512*n A-f h 



L£^fc L*rLCPU£ROM©P^ 
CA^Tl^-5, S1 990(7) ^7J'R0M 



f^ ffc 



VTJrk&'CV-OyyuV^LM 



C0UNTL0W EQU 0E6H ;*y>^-Tfi8 t'y h 
C0UNTH1GH EQU 0E7H ;rt -7 ^-±{58 t'y h 



Z80 



BL-^X^- T^5E $ ftfcl§Haf#0 
ftoB^lfltt BX3. 9 1 1 u® 
mMl* -3. 9 1 1 +0/zf> 

flj &* Jigih $ tlT l ^2 ft fttffc £ 12. H 

C. A, FftQ$^£ft& 



WAIT: 

IN 
LD 

WAIT_L00P: 
IN 
SUB 
CP 
JR 
RET 



A, (COUNTLOW) ; rt * y*-©3g&ffi*?#£ 

c.a ; *n£{&?-r£ 

A, (COUNTLOW) ; *9^- O^Sffl^ff 5 

b ; mizzftm?<m&Ltzfr? 

C,WAIT_L00P ; ISJ&tX^tWtHin^-'f-ti 



>b (4, fc t mm 1 tmpss^rom 

(i, I/O*— r-©D8H#i&£ D9H# 

£ tz, -&tt64* Pv n*< h ©DOS 
©ROMCMSX-DOS^'ie+P/N'-T 
K MSX-DOS2A<48*n'N*-r h) 
(i, 7.P>y r-3-2©16+P/\*< r- 

TfisBE?nxi^o 

R8007W9958 (PIuSil/F & ffilffil 
r -5 LSI) fc 8 ^e>WF*3©MPBTi$ 
fc-5£-f5t, S1 990(1 F»3/gc£ ft 

1z VDP-f >*■— 7 x — ;* HHfcbt 
&»S^CR800tc^x-f hfcrfrlt 

s -niict'Js cpu©^i^s$ 



W£ t x < h «fi|* V«c I H7>T*, V 

Sr^'J^^ASo tt*WV7 r- 
r 7x7'©^<(J, 

EX (SP),HL 

EX (SP).HL 

ttdkts 

PUSH HL 
POPHL 

© «t 7 ^\ ^m*<*^s I ttl if fe 
SW^ffl*'^^^- yp ^7ii: 

«t 9 Us R800©*frfr7>H*TB#MlJ 
^5tt^©T\ 3dL-*3Sf»-^ 
•f 5 ><?* t S C t [i^smtz\ 
tZ Tturbo R(:(* N i$e? $r»BK" 
Z>tztsb<n SK >*y L A-?'(^-"t> < m 

m$ntz 

&16Lvy r-©7j'7>^— T\ T<i 
7T — ;u -t'-y I- MSX turbo R 105 





/\*< M£l/0#— K7)E6H#JfetI, 
J=tt/ *-f h (iE7H#±t!UZ^£ ti 
Tl^o 7c7cL16t'-y KDfit&ift 
fco^LT, ^<7)&4>T'2i'y'>? 

|tr^-vC7)U 7. h 1 HJlffcLfc 
<7)«, BUv7^-(7)iIX3.91V 
#£#-? 7°P ?*7 A<7)W;f * ? 

> ? —Gftffat K V <niVn U iz\ 

_W£/ W h <7)fit %-fig •) £ 9 G 7°P 
^7A^##Slx.tl(^ Bl/y7 
? — (7)ffi X 1 001 . lnWft-? ~?af* 

turbo R© 

5fe^-i-T'$S^-Lfc, BIOS(7)x> 
h U— ^ BASIC© pv> K&HU 
ct^H, turbo RT'te I/O v-y7°(Z 
fc^TC0g!M* < iB^.'btl/c o *ft 

$-M7 ^aBigPA^* s tz«wf l , 

i£«>fcfc<7>A^lo *R*£U-5 
>irf)*ft < ill £\ turbo RlzgfL < 
iiin£*ifcl/0#-hfc* o 

* -r *d/au >/ \— * -" &m 

©&, PCM(n$mW±%s BIOS?: 

-ho i ma.& n -*§•& tz tj -cm 

^-X*-$lJ$m. #-**- 

iz J: 6 7°P 7*7 ACD^jJ^Hih 
l^pj-f 5fcao©l/0*- h„f-f7 
7©Atri;Wzz/n 7 7 AA<+$f 
?tu x-f7 7A<M£ft6J:-) 

&m*e& cfcftc sis? n/c 

•;h^ron<k\ «fl^n-5*rfcL 

ft^JISff". 3 7K*;II^ROMtz1i 
X.T<7\ WM-bLiN, *©T 
(7) * ? * I J, £*©«*4lZ fc mfrnx 
luteV>&£(tft& I/O*— h £ 

|j£a*# T a £ si 990(7)rtg(5T'^i 

ib *H7V \— K ^ x TAWFf * ct 
-) /Co turbo R<7V \-F^i7^ 

T**&V.>*f***i ^LT *v7 
T-A?-fv-* (i x BElzlHfELfc 



£t5l)(Db<ntz 

«>ffW*l^ turbo R©bg£ (3H& 
t&tzSblZb, PSG, ya^^f 

^7^ V}7 X 7°U>7- * 

-*- h%^t-(/\*vx'J -/N'-y 7 
T 7 -y 7°? ftfc ? O y $ IC)<7)jftflF 
(ZUt, BIOS£f£^#7Co 
2£{C\ MSX2+£*il©*&ilft 

tut, /v- l ,, 7x7» l Jty>i:s 
7- -f >ROM<7) #iiil'v7)v -v >7° 

(7)1/0*- hfc'o **WUC(i, 7 

-T>ROM<7)17AH#ife%-zi— JUT 
5£ N ZCO'J-fe-y r-T.-^— 7 7© 
{jtA* A \s v 7. 7 — CjKfttt! $ ft, 
17DH#ife£=I— /Vf5£, AU 
£>*.?— tfJfiA* 'J -fey h^f-^ 
7(Z*£iA£ft5 ££*.<£ 

CALL 17AH 

OR 80H 

CALL 17DH 

RST OH 
t^i^mX\ U-tz>y h^T— * 
7.(7) t'-y h 7 ^r 1 tzLT^«bO# 

*cs>*>W*i:% Msx^ftn 
lzS$et()T#§^(7^ 
i:z^T\ ^-tfBios^-^fc^-f 

(Z'J-tz>y h^x-^fcte^Tli 

oTU-b7 h7^— ^7(7)y\— K 
^xT(7)if-§-(7)i^l^\ JSfZ/^O 
Tl^<5* x *bo BIOS* < *<7)iSl. N £tI 

D0S2A^PSH$nf:turbo R 

<7)*< V ^E y — V «y V \°-" c WIS 
3£fc¥JirCK£3tBIOSfctei.\ ^fF 
f?>'jZ^^$)^(7)T\ Z*l(i3fe^ 

tz(i^oxHffl-fbS/c(£KfF?n 

fc* ? . Sa§E<7>MSXlZ(J*8»fc£ih.T 
(7)MSX(J=^/c 'J tu<7)P > t°a-— 5 

l(Dtzi)\ t'itz%it)\ 



MSX turbo R© I lO^jZf 




00H~3FH 



40H~7BH 



7CH-7DH 



80H~87H 



88H~8BH 



90H~93H 



98H~9BH 



A0H~A2H 



A4H~A5H 



A7H 



A8H~ABH 



ACH~AFH 



B0H~B3H 



B4H~B5H 



B8H~BBH 



BCH~BFH 



C0H~C1H 



C8H~CCH 



D0H~D7H 



D8H~D9H 



DAH~DBH 



DCH 



E3H~E5H 



E6H~E7H 



F4H 



F5H 



F6H~F7H 



FCH~FFH 



g^^_ K</-*7ffl 



^-^7-^-7°'> a V\ 



OPLL 



RS-232C 



t^VDP 



y v v z - 



VDP 



PSG 



D/A ^ yX-£- 



*'-7r+-^ij^i 



8255 



MSX-Engine 



SONY © SRAM 



IW 



7^f V 



y 



VHD $U^I 



MSX-Audio 



MSX-Interface 



7 V y \£ — f 4 X ^ 



1 i^m^ ROM 



2 7K?i^^ ROM 



[^ ROM i£5g 



-^jAN-7- 



}) ■& y Y 7,T — Z 7. 



r^M 7.^f^- — 7Vv 



AV M 



^•=ey — ^yy<- 



a 



2+, B 



K B, X 



2, XX 



2+ 



R 



R 



K B 



K XX 



2, XX 



2> XX 



2^ XX 



2> XX 



2^ 



XX 



R> 



X 



R> 



R 



2+, B 



2, X 



2> B 



IzpgUfcMSX turbo R© 
I /OV>y7©-Ko WTIZ, a© 

8ic«^urn< 

1 MSX1 5^ 

2 MSXS 5^ 
2+ MSX2+SJS 

R turbo fwzmm 

B #&&*BIOS« t^U 



A^^^UrttLMt^U 
X ^-*-7T»a^ 

icttns*hrL^ftL\ 

XX i*£3R©f±^lZB^Stirt\ 
fc&tti*s turbo R©tt 

«*6gyi«*nfc 

t, tt»»CB»^tlrt^ 
&£3tz 
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m 



tt-ju tf^h^ turbo R 



IZ80£R800CPU£ 

U* r- 212, 5fe^-§"(7)#*^- 
^TWl" L fc *CHGCPU.C0M"(7)7 
— XT^ho turbo RX'DOSZij^Wi 

CHGCPU 
T'ZSO^E- Kft\ 

CHGCPU 1 
X'R800ROM^E— K#* N 

CHGCPU 2 
T*R800DRAM^— K£\ 'tt&ttl 

f#l#-f5£s DOSCO^-^x'JT 
(Midi default FCB area) (7) 
5DH#±tWrbPV> Kc7)fgV\°7 

fttiB CTAUy^^ — <7)fi!£iS: 
fe, ^LT N 7-f>ROM(7)180H# 
i&7)BIOS, *CHGCPU*%-H^t/UJ-r 

7 ATI** >W— *-l= *012* 

feA^fc^aH^tifc*^^ £* 

«fc-9C£3ELT#fco 

£fc, T£5fc«bx D0S<7)A- 



ROM<7)2DH#i&C7)|*)^7!r03HiiLL 
"C&&, "?£ 'JturboRT&&C£ 

(7)6FH£f£oT, DOS*— *JK7) 
/ <— V a >#W 2 feLhT'A & Z 
££5£*rS)5;bWc 

U^h3t>|al*SCx 3fc£-§-<7)# 
^X-m-ftLtz 'GAMEB00T.COM" 
(7)7— * 'J* K :K7)7°P?'vA 
(£ x DOS2A < Jei&$tlR800* < JM^ 
$ftTl.*SWC\ (5Av7>T*-f:* 
? (Z Xr> X I ^ 7°P 7=7 A £g» 
TZ>tzisb(nb(D a ol'j, DOS20O 

v 7. t" A^-f £ tlX I uQ«. ^7°P </ 
^A(y-A4'^)^ 5i§K-R800 
^E- KT-l)^T^S)(7)fc(7)fzo 
&m~ 7°P ^7A £$¥!# L X l> 

tfLT n 74*9 *)*&&$ ti*<n 
^ (7)7*- h -b ^ ^ — &M&&A/?.. 

mt. W&<nsj : &X7-\-m? 

WK"C ^— v 1 (iD0S<7)R0M, 
*(7)(5AN7>'<— vtSRAM, *i*'J 
— 77i^(i-fe7 r-£ft"CUS 
?>b[Z, X^— ^I7°P^*7A 

^(7)^-r>^— (7) N #<>*— =§: 

151*1" S^tfXDDOS^-^X ij 
Z(F323H#ife) ZHLls?*-? — 
ttz^—P 1 £RAMfrbDOS 
(7) ROM^-tJ M ^*_ § 7°P ?7 A(7) 
#tfe(F368H#ife) &DEUy7^ 



«ES^ CHGCPU.C0M7-7.U7.K 




sub 

ret 

cp 

ret 

or 

Id 

Id 

call 

ret 

end 



!005ch+l) 



c 

3 

nc 

80h 

ix, 180h 

iy, (flfcclh-1) 

flfllch 



command parameter 

0:Z80, 1:R800ROM. 2:R800RAM 

abort if parameter < '0' 

abort if ' 3' <= parameter 
set change-LED flag 
address of CHGCPU 
slot of main ROM 
inter-slot call 
return to DOS 



djj j gjfr 



GAMEBOOT-COMV-XUXh 




_conin 
_s trout 
_setdta 
_rdabs 

dos 
enaslt 

notfirst 
master 



Id 

Id 

Id 

call 

Id 

call 

Id 

Id 

call 

Id 

Id 

Id 

Id 

call 

Id 




Id 

Id 

xor 

Id 

scf 

JP 



prompt : 



db 
db 

end 



equ 
equ 
equ 
equ 

equ 
equ 

equ 
equ 



09h 
lah 
2fh 

0005h 
0024h 

0f340h 
0f348h 



print prompt message 

wait for key in 
read boot sector at 



logical sector 
drive A: 
read 1 sector 



sp, (6) 

de, prompt 

c, _s trout 

dos 

c,_conin 

dos 

de. 0c000h 

c._setdta 

dos 

de.0 

1,0 

h.l 

c, _rdabs 

dos 

h.40h 

a, (master) 

enaslt 

hl.0f323h 

de, 0f368h 

a 

(notfirst), a 

0c01eh 



'Insert game disk in drive A:,',0dh,0ah 
' and press any key $" 



I 
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MSX-DOS 2 JSfflfflBS 



msx turbo Rizmmmmztifczt-cmumyt*® 
z>t\ ztii3^m^m^zmm\^zi\z3<t:mz>o 

turbo R(ZMSX-DOS2*rtf3S3* 
WLZtlZZtlzKitzl £, ® 

*m*itfxm^tz£z.*>x\ * 

L*i/j:i\, DOS£(S£A,W? 
£|Hfcr*lTfcx f;^TU(7)A^ 
a.lz3§LTL£7Z:£/;:S7o 

!•—■ r-f >^* • isZ.T&ayR&tz'o 
r'-f * ^ K 7 -f 7'(7)l3I£-4 , 'L-lz x 

=1 > t°a - ? -^MAMcnftc 

WC:D0S{;J:K#(7>A\, *<7> 

D0S£1s&bfc < X fc x DISK-BASIC 
T'*J£ »J * «fc ? Wl*^ 5o T'fc, 
BASIC(7>J#£-te N BASI07)7°P ^ 
A£&lirt-5>f::*!><7)*BASIC-f > 
*-7*'J ?-*** * 'J -_L(ZS 
l^T fc < {&£*<* % fcak 7 V — 

£* L AS*!** S C £ **T?g #l\, 

£ z hb\ Doscnw&it, *>*7\A 
<n n — ? x u 7* tetfiW*T 7 'J 

-x'J7*£LTflM.*(7>-C* 53+ 
□ A'^fc (ASM SrStfS-f 5 " £ 
**C# %<ntz 

£tz, MSX-DOSte, PC-9801 

ftWCttfetm**'?^ ^ n v 

7 htii<7)i*V7 r- 7x7T* 
€k MS-D0S£<7)|I|]T7t-OK7) 



t'o. — ? — tifffti. -5X1 ^&3I(z 

o^T J: »iai< wrt 5 Z £ *<T* 

* -<nmi £*# < Sffl-r s z t 

MSXi— «f— <7>4>T\ D0S<7),®E 
£ 1 IZM.& Z> Ji 5 f-X-m IX # tz 
A#<0»&ci v7> hznt tzm>\ 

r>l^M&iX\ MSX<7)V7M4 
R0MJKA<±#IZ KiX^tzlttb 
1Z> il— +f— (4*— h U -v v<7)|£ 

ftC 7= f -f*;7Ji£<7)77r-A < ±g;L 

T £ tz*tex t> % (4 1; *Mr fc msx- 
Dos£*a#&A,Ti*fc u %* u v 

7-^(75 X -f * ? t^Iv * T" A £rf£ 

■pTl^yT, a-lf-OBC 

dos^^b*^ < x h^mtut 

Ufrr> tz(Dtz tV * i'gt^T 

C7t*T<5 % MSX-D0S(7»7 

#Xnb(7)ttfrh-fs y— A(7)-tz 
— T'fflr'-f ^^CLTLIofcA 

X'h. MSX-DOSZ^^urbo R IZ 

i^«IStifcc:tc«fc7-c, ^ 
i i*i tiMH&tft < ftoT t v < c 



MSX-D0S2B 

/^*'JS-3 T, tztztzMZ? 
-A 4nll^(t^-3 fc >bs D0S(4 

iv ! £M-yXl\&Mz£-oXl*s 
DOSteWlfMJjlzKiX < n?> 

MSX^: LT(i«5)<7)DOSt LT 
BVLfc: MSX-DOS (feTFDOSlfcBD 

(is 5fetzfcvi.nfctfc'J, v<^ 
P 77 httc7)MSX-D0S^S^tt 
*< A 5 (7)7^ U WMST .o /c tz tz\ 

mmizte s 'jz^*/j^i(7)fc(7)L 

OCOtlT^M 1 ^ fc ttiT # tz 

?iUz&*mmLx, *jm 

&£k$:1]QZ-tz 1 7LXzW& L tz<DtiK 
$W&. U _b(f 5 B*lgMSX-D0S2 
(W.TD0S2)4(7)^ o 
DOS2<7)^# &MK& -^(7)^(7) 

^7coT, d*>£<bB*A^ff 

tfcv mzizmmr-t w \> u 

7 7"f^aiZftlJRB<7)*^fcD0S1 

37c#\ 7 7<JI/ 
CO^ItZjloTT 1 ' 

z;i:^*pTf|iz^o 
/c<7)7c l$Luz 
£(X&'<— v(7)P 



^^s<7)RAM^-xii$i«i < mmtz 

Z£tl < X'£Z><£l IZ% o /c(7)/c 
RAMt-V ^. ^ (7) T 7 <7 -b ^ ^. t°— K 

«, 7n7f-f'-f7^i:(i*8 

i\ cn^^^^-a-ms; 7p 
^7 s > ^<?5« h ?—> £ r v 

7Y5*; 

&&>(* MS-D0Si:c7)7 7'-l' 

Wm£<r>7*-?<n>S>i) £Vhg& 
x-zKLXitizntfo 

turbo RtZ^vpT^m^n^z: 
£ [ZfrotsZi £ X\ D0S2(ict U ^• 

< coAtzf^n^c i:(z^-&izit 
tyaetx, *fc, zn* v "b«D0S2*i- 

fF^-«:^nw'^-r^tzjtoT < n 

^ Z T\ ^IsKi DOS2(7)>gffl m 

fifei SM;(5 »= i> r 7^ r J£ m L<%. 
fftiiX < S„ DOS2t4 s tAftl&h 
&$iXl^Z>(7)tz 







[IK] ftSSIffl td:td:J] 



.nst, -?-ncMaT5 



mil Msisi 

ASSIGN ft: B: 



^"b(«-v ^t=§fi1] •B*S*fJ*-i:4-->fcD0S2 <) ^ -y-tr— ^feB^ST-^^StiS. 
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m 



7i— )b tr v^& turbo R 



iai37>K« 



ATTRIB 



;w^, DOS23rf£^Z&T/-c 

37>FCIt, rt£B3"7>K£ 
fl-gps v > K<7) 2 ^S^'&So *f 

7fAf^ *?A<!&glZ#S<7n\ 

ASSIGN 

RAM^-f *?<7>|Mtel££rS 
£ (BK&nLrfrfclZ-^Tte&aS). 
SKDliH K7-f yCSfl U ^T «b ft 

yrtfcS3gL.fci^#izte-7(7>a< 
zm&frtz\ tztjUZ 

ASSIGN H: A: 
fc-fS^RAMT'-f 7s?£A K^f 

yizgj u hits z; t a*cs *£>/£, 

ASSIGN 
£ £ fc £ IZMT Z £ *r*T-# S *' D 



D0S2T12,7r'OHZ^S^S 
<dttt*Wrtt* 3 £ #*?* So 

77<^^l^uj: tZ LTx 
(5AH7)3V> Ktz«fcSJIB*fc®lt 
#1% J: -5 (3 L fc U . rt^tfCTT* 

£<7>fcf .£:&*.(£ 

ATTRIB +H FILE.TXT 
tTSt, FILE.TXT fclvj 7 7"f 
;Uti**WlZDIR3V> K&£"C 
MS Z £ ^T'# fc < ttot L * -9 o 

*fc 77"f;K7)rt§%-3®$ft 

ATTRIB + RFILE.TXT 
£A7TfS£s FILE.TXT£U7 7 

7 -< Mmm^^-m L^m£ fc u , 



CHDIR 






So l¥H.^H^(iTC0=l7A?r# 
0BXT<fto T\ z:<ZM&$-l#g3£ 

.50*SKtSfc*<7)fc<7)o#»L 

TCD£3Sars - £ fcnJBItt, 

CHDIR A:UTILS 
£\t)TZ>£, A K7<7'<7)2ib 
>hf^U^h 'J— £UTILSIZ^ 
sETSZ^T-^So 

CHDIR B: 
£TS£s BK7<7'^U>h 
7*-fb* HJ-fc#a.T<ft*o 

DISKCOPY 

COPY=IV> Ktfr'-f *?<7)rt 

^77 -f ;u^fit"P3 tf— T Sc7) 
lz*tL7\ zco=iv>K(i7 =f -i'7. 

f(7)^3 t— T S fc(75/c fcfc* 
U 3t°— TC^T^-r^^^rit: — 

■f Is] UT-#(tfttffc*b>&:i.\, =1 fcf 
— 7C# < 1DD7*— v-y hCO-r-f * 



7<7)%£-ti, 3t: -&k1DD7* 

FIXDISK 

D0S1T*7*-v-y h Lfcr'-f 
7s ? {& «*W{Z D0S2 £ S^T 

*>SA^fcfitft£\ *(&**-«& 

flbzET S UNDEL n v > K & £\ 
DOS2*5*r<7)^£fiH - £ tfX' 

fc^fc DOS2Sg|(7) fc (7) tZ L T 

^S'jZ^^^So Km-ktbizmM 
$tiiz<Dt) < Z(Dzi v> Ko 

FIXDISK B:/S 
£-fS£ N B K7-f7'<7)-x-y*? 
#, 5n£& DOS2S&7) fc (7>(ZM#f 
SftSCttZfcSo 

fett*(=« turbo RlijgfjrfS 
£l\ f<7^7*-77h^ 
D0S1<7) fc(7)*rDOS2(7> b<T)t£(Dtr 
fc-T-i-y^LT^So^LT.DOS 
17*— Vy K7)*i-g-(iZ80*— 
Ks D0S27 *-7 7 F <7)J* -g-ti 

Rsoo'e— Nm&TS, fci^c 

^^M:x.T^lNT<fto 



77'-TiU©gaKSiIDIlli5 : -rU^r- , J 



ns7 7 -r jucoisiSs g^r 1 1 efli^r 

^f^^:lZ^orL^fcci:Ur : fe, ZftlU 
±fc < ts•^CD7 7 -f Jb£fES 3 i IS^ 

pitgfcofca)^o 

znizcfco, 77-r;w»cBWSfBiPH 

ziw Krm'Kr 5*s£s 

UTILS <dir> 
^Ccif©cfc5(Z, *^S£5&?#«^tift 
rusttfcoizisiz, ^hjts.-?-<? 

7T-r;bzris«<, -y-7x-fb7hu 
-tD?tfns=fe©o z:©4 3 lz^fc77' 
•YJUtf Aort\SCD^o t>"7xi- U7 
S l J-©cf J (Z)77'-l'Jbtt« 

DIR UTILS 
itN5'^-5lZ, it77 s -<b7hU— © 
SiPgmSUrDIRzivyKfc^T 

fs^tizcfco-Cs ms3i^r*So 



5<if6©H©ck5Cflfc-r3<*:^ 

r*So *cD«»^ft©d;-5a« 
iitfeDfisnrnsrofc'o 30 

5Sx «o3lZ^fcSgB7>IS, JU 

©TlZ^6ftS©/3\ ■y-77 r -fb 
7KU-iD?ISftrL\So 77"T 

JU^^rop'gg^iiz^^Lr, pg 
■tV b7h'J-^Sfflt-Si. 



7-26 3: 
423KA-f I- ^2811^77 •< ^.TRfflfJ 



19 90-89-93 6-Kp 

4196-89-17 9:26p 

256 98-68-25 8^25p 

4878 98-69-03 4 58p 

15472 58-85-11 4:24p 

<dir> 99-89-18 l:46p 

<dir> 98-89-18 148p 

<dir> 98-69-18 1 52p 

22432 g-88-28 918p 

16256 59-09-18 7.53p 

16123 98-89-18 9-OlP 

16128 96-69-18 754p 

12238 58-89-13 11 43a 

10248 98-09-13 11 52a 



n"- Vtjt? h V 



HSX00S2.SYS 
C0MMAHD2.COM 
-AUTOEXEC.BAT 
UTILS^7*7 ? 'fV^b'> 



-mS^-fTVs?V)- — ASSIGH.HLP 

-ATDIR.HLP 



-CHKDISK.COM 
DISKC0PY.COM 





#y^fAf-f^?ro + tDIR37> Ktfl'stAfci:;^ 



#XDIRuv>Kli, 7 % 7 , 7 f < U-i' h U-CO+AiT'^T* 
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KMODE 



m$7-*x h^E- K&i£rts 

KMODBi^fg&P v> Kfc<7)T\ 5" 
-f^^<7)tf(3, KMODE.COM £ 

U"3 7 7-OUA < #U£fi6;l&l\, 
fi&^lSs DISK-BASIC(7)CALL 

KANJI^fc— #t£ 
KMODE 3 

fc L x-3 /cfl^lZ, ~ 3 £ T'(K : M 

**£— K fc^T'# S Q ANK (4M3 

KMODE OFF 

^ATjffttiVi^; 



MKDIR 



Dos2Tis, rxHzmm Ltz^i 

fco MKDIR (^-f^T'-f U-7 h 'J 
-)ttJlfL W7tV U* MJ- 
VfftSf S fc«>(7) P V > K fco t£ 

b&LT, MD£RIfi1-Sz: £ fcx*# 

& D tzt%& 

MKDIR A:¥NET¥PDS 
fcA^rtUl A Kv-f 7*tz&5 
NET£U-)xf U? h'J— <7)+{Z % 

PDS£i^5BfLi^7 f -f u? V'j- 
&#SZ:£A<T^£*>lt*fo 

DOSTt'ti, l^f^^Cf 

A1 1 2f i<7) 7 t-< ;u i t- £ i > -5 frj 
T-r^^t^-fbTsctT', 77 

MOVE 

D0S2W,7 7-OU*fg#fbLT 

A,ft £ # CfiEf IJ^:<73*<MOVE3 v 

MOVE CALC.COM ¥UTILS 
£A7lLrz*t£-ti, 4-. ga*V 
5f<L/^h 'J — <75CALC.COM £ 
1^-5 7 T-f;U?rUTILS^ 1^-5 t-'-T 

u? h 'J-^«9Hrr-5*3lt^fo 
)f<u^ mj— iziiii; 



£iiir<7)7 7 -oua<*o £*&£■(& 
vv 7 7 -r ju€a<s& l x i* j r " £ 

toktfs\.\ 

MVDIR 

M0VEA<7 7 -f ^^-fiT-(7)^it) 
Af-a /:(7)C^LT, MVDIR (A— 7* 

— ££&;:•£, itf-f x?ay< 

/z«6«7)fc<7) 

MVDIR ¥T00LS ¥UTILS 
£*&?%£. TOOLS^I^t-V 

7-C/l/£UTILS£l.^7 f -i'U^ r- 
ij — jmtio £tzjH£ij\/P 
ZMttZtisa >f ££ A^f & 
/H«,^^yi<757 T 4 fobs*) 
-5 (ATTRIBP V> K£#SS)o /PIS 

1 n®^ Lfctz^. -eas— vW 
#£«/, *-7j3^*>(z^s 

PATH 

D0S1, D0S2tzpg>b?\ffi»A < 
\ COM", A5UJ\ BAT"<7)7 7 
•f-MJ, D0S_bT'7T-r;^?rA 
7J-rS/c(tT^TT'#S fc£U 
DOS2(7)ti^ N Ztt#*im<7)(J % 
PUt** U7 h U-<7)«tifc*lt(Z||g 
"bnSo (5*H7)r f -f U? h- V-CO 
C0M(=|-7>K)7 7-OU J £\ BAT 
(/ N'-y ?■) "7 7" -f )b*Wn L fcl ^ 
#(i, C<75PATH(/N°^.)(7)na5:^ 

— ICt^$££'C UTILSfcl^+f 

7t-'<U7 h'J-i7), KMODE. 

PATH ¥UTILS 

/cA,lzPATH£/-'ltA7J-f 5 £* 
* fc % 3S&0V f^iCfffc G BIN 

ti^fvu? MJ-^-iiiaL/c 

PATH +BIN 

PATH -BIN 
£m£L±i 



RAMDISK 



RAM-^-r 7-7 £ Lxmrntzs 

4064+n/N'< h^T'o ^^LfcS 
filA«1 6T'tiJ U -fcjn^ l ^%£-te, fc 
oi:feiftiM6*P/\*-r h(7X^t(z 
«J»J±.(f<bti*o t>*>^>A,x RAM 

S ^ < >RAM(7)A ^ ? (Z J: U Wj: 
So y-f >RAM256+P/n'-T h(7) 
turbo R<7)*:§-£\ RAM-T-'-r^^(7)S 
A^»S96+P/\'< h/c 

RAM7*-f * 9 *-#$%. L T L * 
i^ri^i:#(z(i N 

RAMDISK /D 
tA^-rtiffivv 



RMDIR 



MKDIRdWtl^-f l^^ 7 h 'J — 
*f^fiR1"S<73(z3^Lx RMDIR (U A 
-7>V U^ h 'J-Xiv^Hf U^ 7 

tz RD£VfcT : bZ.£bTSJiSt 

■5 £ L/zt-V U^ h U— C7)4>(Z7 

^(t-VU-^ h'J-^-ML/zJ: 
£ (zfF^ns, *. "fc «t tA *. . " i: 

^ hhfr\S&), 00.(7*9— h) 
3V>FA\ MVDIRPV>KT'7 V 
-TLx^ h'J-?r^o(?(ZLTJ3< 
'j2^A^Si:i^ "^fc'tao 



RNDIR 



RNDIRCJ^— Ax-f U^l-U 
-)tt.7'-f U^ h U-(7)^bu^^ 
MTS/c«!)(7)=iv>Ko 

RNDIR COM BIN 

£Lfc*ft£\ C0M^:L^^T v -1-^^ 

h l J-A < BIN^l^^^Bt^Z^M^ 

nSo ^it(7)T-f u^ h >j-« 

A^TIZt^V 7. ^_b(Z#& L X I ^ 

itTfcb^.4'1^; 



RNDIR COM + BIN * . OLD 

COM, BIN^Uv^t*^ u^ |.y — 

^A\ ^ft^'tlCOM.OLD, BIN. 
OLD^l^^BUtZ^So 

UNDEL 

A1t^zfc$)S^l:^^^A^d:o * 
^j:i:#ttv I^T-T, BA<-f, 3 
W3V>K«:II^tLJ:-5o 

UNDEUi, S'LTLiof:77 
■f Jb&fflS L T < nS 3 v > K 

UNDEL * . * 

£ tzs UNDEUi^gP v > Kft: 
<7)T\ 7*-f 7 7 (ZUNDEL.COM A < 

VOL 

vol 01-: 'J a. - A ) =l V > K tix 

TJkLtzV. ^ML/c'JT-#S 

VOL B:W0RK DISK 
UTtHis BF7^7'(7)f^7 
(7)/-r: 'j a.— A^^U^-'WORKDISK" 
^l^^BUtZ^SETSo ¥^<?5* 

Ix^alHg/'io 



XDIR 



XDIRte, DIRPV> KfcffilTL^ 
SA\ 1T7T-V U7h 'J— rt<7)7 

XDIR /H 

i^S7 5"r^ufc^^:?nSo ifcs 

UNDEL.COM £ U -5 7 7 -f /UA\ 
^"(^^•f U7 h 'J— IZ&£<7)A*> 
A v «b4 v V.^^-pfc^#s 

XDIR UNDEL.COM 

irftl^; 7VU7F 'J-^^^ 

^LT<nsc7)Til^J/c z:nt> 

^gBPV>K^A^*3o 
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ft 



*-/u if *M turbo R 



HDSSIdWBl/fc 
IISK-BASIC 

£T, DISK-BASIC©/ \*— v a > 
2.01Z&, D0S2C*tec?r5fc«)tZ, 

CALL xxx 
fcl^fcJ&T^IBSftSo CALL 

&> 4 _"(7>y-A'-)cfii 

£1sM.l& BASICLLT*6D0S7-r 

CALL CHDIR 

DOS2<7) CHDIR ■$<$•£ Ir] b## 
3% L T^IBf 5 ~ fc (i"C*# ttc * 

CALL CHDRV 

#fiBf & K 7 -f "7*^ fj g* § 

CALL CHDRV (*B:") 
£A7Tt£t, RLES&£\ B*W 

£ £ cz, b k 7 -r Ttort^^HB 
£ n* «fc -5 c# •& <7)^* *> &<&iz, 

DOSJiT'te, W»K5-f^**A 



CALL MKDIR 

■J -fcffeSI" 5 tzSb<Dfc$ D0S2 
(7)MKDIR=I7> K £ |W) LM»# £ L 
T < ft£<7)fc* fc& CALL CHDIR 

^^firtitz, iSfi&LTSiie-fs 
CALL RMDIR 

CALL MKDIR£(J*t&#t"*p™, 
tt£^&S^(#i&<W7*T'.f U 

tfM^K&SrSS it DOS2(7) RM Dl R 

WLt^iB-rs r £ ire# jqclv, 
CALL RAMDISK 

£rc#x7)^ DOS2C75RAMDISK 
7^(7)+ IzAftT fc < <£ -5 iz LT 

CALL SYSTEM 

B/KS\Ct)"hDOSiZ^m^MTtz 
«6c0nv>K o & "b*r U#> DOS £ 
mhLX. DOSJbA^ BASICS-^ 
WlLtztZ <n&m Z t ¥X'£ -5>o 

CALL SYSTEM (*DIR*) 



tKt&vHELPmm 



£lz/><, zfttz\Jziv'y^$L 
Ar=fc,ci:S<!f£(Uc*:o$y>5£ 

«0'&#cb, &iz££5-rn«u 

ivzw , t»!i , 5a<o^ Sorb 

J*U7~ zl7 JU^o-t-i < CDteE 
$)<&lv&GDo ^hts.t^(D1ztb 
C, DOS2li'v/U7«H!gtf?Ell 
Lriv5©rtf fc£;tlJ* 

HELP MKDIR 
iA^-TSi, MKDIR=17>K 

[zm*tEftz>? 








• 'J ¥-( U? •> 3 >*>/\*-f 7lclWf 5& 



£U0violzA7rt5£, DOStz 
iW£TZ> Z t tfX'Z %<Dtz 

FILES 

'J— ^^r^^T*#-S) fcfc'U 7 
FILES.L 



DOS2IZI3, l/O'-Wl^S/ 

DOS©37> KCDAai^CD^as* 
13 Wz. : 5fclsb<D : b(Dti.(Dtzo 

®lca^tinSJ:tao Tv 3(7)Z17 

Die, 77-rinct±i*-rscfc7icis 

DIR >DIR. OUT 
tLA^iSoCJSS-rstx DIR3V 
>K©m»tfDIR. OUTtU57 

7-<^u©^ictrnSo -s-ur, 

TYPE DIR. OUT 
£A2)Ur, DIR. OUT©7P^ 



e* a |S|«CD7?Sr, =17>K©^ 
mi?tl1z Pm* 3 7 > H IC A2J-T S 



OAafszditfrasflWio o* 

•rS3t^r$S<!:t\5^l7fc 










tXNJH 

^<7)ti*>H t> D0S2(z(i, ®ftt£ 
— tits :tm-A*LT^:a 
?> bcntz 

tttXtZ ^W77^H3 

fc =1 7 > K ^r^^tiir Z t ^*T-# 

j&% t> 1 ymtf&Z TLi-otzo 

*So/z r MSX-D0S2 TOOLSj^ 
H'iz-O^XCDU &m U ±tffzfrr> 

tzAstztft'tZo 

TD0S2(Z>ig* < St £<7>(;t'j&3lo 
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(DPGM&&h7?ah*5 




■JiSJBfc 



turbo R\zmZ£>tltz%\bl\mm.PCMoi£-Dl?<m 



BASIC?0)ffiU£ 



*fc*fc, PCMiiv-r^ttttJr 
&A^fc*^5W:n>G38fc 

MSX(7)%£\ PCMr-'-^Ciy-f 
> RAM £ /c C2 VRAIVHZ ieif £ -tf" 3 

Ki15.75KHz, 7.875KHZ, 5.25 
KHz, 3.9375KHz<7)4S£Io flbtffc 

5^#tH, BASICS «b PCM £ 

&&£:*?& wCD#^r%Htrt* ^ 

fcflt"t\ PCM<7)t§ffif*»#£*«nfti 

ttttnlKi c tix i: b> •) &A4&L 

i tVM9 £> BASICCO "CLEAR" 
^T'PCMx — ?ffl<7>> ^E 'J - 

fWWWWiTfeWM.*^ mm 



10 CLEAR 100, &H9000 


20 


PRINT "■{7*5 


B9tV V 


?X 






30 A$=INPUT$ (1) 


:PRINT 


40 


PCMREC (§&H9000, 


&HCFFF, 0) 




50 


PRINT "it-fiH 


vi*. ": 


60 


A$ = INPUT$ (1) 


:PRINT 


70 


PCMPLAY (@&H9000, 


&HCFFF, 0) 




80 


GOTO 20 





C000#±titfr h D000#j& i T£ PCM 
x- * ffl IZ-® ?£#(£> *CLEAR 
200 , &HC000"(7) «fc -5 IZ L T fc Z 

ZfJWfn ?7 A£flJ-£T fc^tzCD 

h%*>A* VRAMfe-PCMr 5 — ? 

(z fc 7»— * £S < Z £ **C* *0> 

Tfcl*V.\, ^-tHZVRAM(7)tf-g-(i 
PCMx- * £ g T'SflST ZZttf 
T-#£o g*7KZ*SCREEN 8"<7)J: 

tth PCM^T $£, 7 > —?M% 

U-h^r^AtKi; 4f3fs fc <7)*L° 
-KT'S^T^>za:fcT'#-5o fc 
fc\ H£t£ PCM &H£ LT^i: 




PCMBUlOBASICro^ 



CALL PCMREC 



CALL PCMREC main ram, VRAM^coit^ 

;w, E^x-r^] [, s]) 



CALL PCMREC 



m^<7>t§^ 






• =15.75(KHz) 

• 1 =7.875 

• 2 =5.25 

• 3 =3.9375 



b U # t"</H;j;§&S«<M*S;* ft -5 £ 
U % £ st «*><M*S£ ft * f, ojf:« 



CALL PCMPLAY 



CALL PCMPLAY main ram, vRAM/r»b(7>#£ 
(@Hi&gife, SSTStte, It^'J^b-h [, S]) 

call pcmplay wmmt>^<m± 

(EfJSJBFS, HI*], -H->^U>^b-S) 




MREC, PCMPLAY fc fcfcf, ^ig*- 
:•& t » t • £ fJ> -^Sti: SS^ - K 

JRlC^t ST, itz. R800 ROM^- 
K T-15 . 75KHz^liS $ ft 2. t x 5 - i; 



T, 0{J*#53c4-fc<OT\ 
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m 



*-j\, ti^h^turbo R 



BEEPm^PCMrHB-rcD^! 



BASIODyn^AfcrUffLT 
l^^gH jCTRLl ^ lSTOP l^ — frl^l 
B^Cff L T 7°P 7=7 A £ dpM £ xt 
5t, *fc?<y*fc BEEP^rflS-g>(7) 
IJ^tl^f^i *LIST*^ 
T'J * h £g|^£^ |CTRl] + [STOP| 

Z^tftZo BASI07)*SET BEEP" 




■7F.Zix%><nX\ £ 



fc'(tf> 4}®lffl;t£ftTu5£' 
Z CO BEEP^ £ PCMT'Bfe h T £ 

£i t£%>t>\ W& ] ) ? * Anx 

-7*MSWL>t"<Z><nX\ 11 -oZ 

£tV5Jk#"C ZC07°P^'^A 
^IW5^ BEEF&&PCMT* 

*> A, turbo R^ffl/Co ^<7>7°P?* 

7Att> 7°JK7) PCMx — ? £ 

MSXx-f ^^iifitzAtlTfel^fco 

^LV.Ms6l^4±.<7)=l7A^# 

~ (7) 7° P 7=7 A (i y -f > RAM 



?D?5M>ttWj 



OPCM BEEP tz^h 

WKBEEP^A'PCMlZJi UJt, 1 Islll 

aax-f . * fcv clear5:<7)SS:$-^m i- 
©PCM BEEP Wz^h 

BEEP^Sr, b£(DW.mi-mL£t»X 
ALL SYSTEM* T-D0S^D0S2(C "f % i: 

^X<tz$l\ 

©PCM f-^4 

to «Bictt-jT<e?i'. 



©PCM 5*-*»S 

PCM5-15.75KHzT-ilSLS-ro £1^83 
iSB000#tfefr'bCFFF#itfe^^ffl o 

©PCM x-£ LOAD 

i&fc^*. PCM*tf>BSAVE^5tT7 D -y 
fc'— T-f X7lZ-iz-7StitzT'-7^ 

©PCM x-* SAVE 

4 #<7) n v > K T-SiS L tzPCMf- 7 
%?4 ^^(ClBitL-Sto 

©END 

|CTRL| + [STOPlT-fo»i I'SttA,- 



0>«<— V 1 (4000HA^60FFH J 
TOl-^^^T, ~ C7)7°P ^7A^ 
■miUzh£ 12, *CLEAR*^T* 
n— +/— x ij T-tDjJlS- BOOOHfei 



<7)T\ ^o^U-'CALLMEMINI"^ 

BASIC<7)*BEEP*^£^9 £ # 
(i N "PRINT CHR$(7)*£ffcbUi:: 
1&b#l^ BEEP&tfPCMCtt 



^k/TS^k/^\/Tk^\£lfk^ 


V1AAAAA£\ 


®©W5W©Wj 


}U<z*3%yVXjk) 


10 SCREEN0:WIDTH40:DEFINTA-Z 


300 END 


20 CLEAR100, &HB000 


310 GOSUB 470:POKE &HFDA4, &HC9 


30 DEFUSR=&HD800:DEFUSR1=&HD806:DEFUSR2= 


320 PRINT"PCM BEEP 7 n?} y7->7. 


&HD803 


330 GOTO 100 


40 FOR I=&HD800 TO &HD87F 


340 GOSUB 470 


50 READ A$:POKE I, VAL ("&H"+A$) : NEXT 


350 PRINT"PCM D v *> 9 A->" ^77, (HIT ANY KE 


100 PRINT 


Y!) "; 


1 10 PRINT" 1) PCM BEEP M " 


360 A$ = INPUT$ (1) : PRINT :_PCMREC (@&HB000, & 


120 PR I NT "2) PCM BEEP 'Jt?r" 


HCFFF, 0) : I=USR(0) 


130 PRINT"3) PCM f" -jf t-ft-f" 


370 PRINT"Dn> vi^'JaO f* 7. 


140 PR I NT "4) PCM 7* -J D^t>" 


380 GOTO 100 


150 PRINT"5) PCM f* -7" LOAD" 


390 GOSUB 470 


160 PRINT"6) PCM f* -7 SAVE" 


400 PR I NT "PCM 7* -i LOAD 


170 PRINT"0) END" 


410 INPUT" FILE NAME (8t->* ) =*' ;A$ 


180 PRINT" HIT 0-6 KEY="; 


420 BLOAD A$ + ". PCM" : I =USR (0) :GOTO 100 


190 A$=INPUT$ (1) :I=ASC(A$)-ASC("0") +1 


430 GOSUB 470 


200 IF I>0 AND I<8 THEN ELSE190 


440 PR I NT "PCM r* -$ SAVE 


210 ON I GOTO 230,240,310,220,340.390,43 


450 INPUT" FILE NAME (8tv* ) =" : A$ 





460 I=USR2(0) :BSAVE A$ + ". PCM", &HB000, &HC 


220 PRINTCHRS (7) ; :GOTO 190 


FFF:GOTO 100 


230 GOSUB 470: END 


470 PRINT CHR$ (1+47) : PRINT : PRINT: RETURN 


240 GOSUB 470:I=USR1 (0) :I=USR(0) 


480 DATA C3, 4D, D8, C3. 5F, D8, CD, 6D 


250 PRINT"PCM BEEP 7 n<)2W f'$1X t 


490 DATA D8, 3A, 42, F3, 32, 2A, D8, 21 


260 PRINT"DOS 77A D0S2 7 7 *$KA tfiJ" PC 


500 DATA 2E, D8, 11, 00, 40, 01, 00, 01 


M BEEP 7 'J fe -y h yft<7 H'H. 


510 DATA ED, B0, CD, 76, D8, 21, 29, D8 


270 PRINT"PCM BEEP ; 7* -7 A V ->' 1 (4100H 


520 DATA 1 1. A4, FD. 01, 05, 00, ED, B0 


7J7 60FFH)i 7'm. 


530 DATA C9, F7, 00, 00, 40, C9. FE. 07 


280 PRINT"CLEAR H\,4 7" B000H 0*3$ - tv 


540 DATA C0, 01, 00, 20. 21, 00, 41. 3E 


ri vfl A7-f7fe>7J-\ CALL MEMINI iV ) tV)-r' 


550 DATA 03, D3, A5, F3, DB, A4, D6, 01 


a 1 ) tvH ;m-f a vm m* ?**?t>. 


560 DATA 38, FA, 7E, D3, A4, 23, 0B, 79 


290 PRINT"**. BEEP *<fH 9 ->3^ 7Ah* A PRI 


570 DATA B0, 20, F1, FB, C9, CD, 6D, D8 


NT CHR$ (7)9 7*^7 JVN. 


580 DATA 21, 00. B0. 1 1, 00, 41, 01, 00 
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_t 



-?*sym:~pcM*\ 



B\OS0Ml\7i 



ot'J ^IV7)t!)<BI0S£^ 7J>£ 
)\st£ £<7)W(Mtes BAS\C<7)b<T)t 

mmctenx-mmizu^tz^ i . 

BlOSfclSb?* £ % PCM^if^L/c 

KS15.75KHz, 7.875KHZ, 5.25 
KHz, 3.9375KHz(7)4M$IL^a 
**% l\, 63 . 5jMZ- 1 iz-fittfg!*? 
**?>? — VI$r>Tl^>fc«>x 

4JfS&WJbW>7*U >?V- r- 

?-&, 3.9l1^>z*i:(zfit*<S!M 

Lfc<7>A<3-[s]ilS*rtSfc<7>o 
*1\ "Bz&sit^Py'^A 



'E 'J <7)$fc§£7' KUX$* BCUvT. 

?izte»TSx-?<7j*# $ £ 

■?tl***l|££LTfr<o fLTE 
Uv*?(Z(2 s ->7fA^-f7- 
Tfaa 7 > r- -^7) 7 x - h £ Atl 
5<7)*\ £Ix:£TSo 16T\ AfU 
/clM5.75KHz(Z*l^"t-§>o 

^-vCOH^E^P ^7A«J 
fe ID U Ac'o HLIZW^T 3 PCMx- 
^CO^fellT 7 KU-* V BCtKir'— ^ 

PCM||^7°P ^7A«U7h 
<7)^+{Z *0EDH,70H* fcl*^> 
t£h<Mfti%bK cn(i"lN(HL), 

hfrMMrW*. fti^-77^: 
It (Z^B*? •££ R800<75^7i* o 

tlzfri. i£iTfrT*>x.—tz 



PCMREC 



PCMPLY 



Sift: y-f>ROM-0189H 
^5t: A 

b 7 b 6 b 5 b 4 b 3 b 2 b, b 



mm 



M : PCMcoS£ 

: ^-f>ROM-0186H 
sx/E • A 

b 7 b 6 b 5 b 4 b 3 b 2 b, b 



Y 'J ii- 







: EHLC^— *(7>#Jft) 
: DBC(zr—?(DM:$) 
AUyX^- <75fcT*y h 7, 1, 
&0>lfct2r3&& PCMPLY<Z)fc<7> 

frb\£v Y 3 (i*i* U 73'- u^ 
;t/'£ iA«\MMli U*o3 8o# 
It £ fc*^*^ ? £*g£f *» 
z: OMtf o jQc *b & fc £ *> czfi^ 

ttz, kU*JX$r-m\Z*j Y 2 

*< 1 4 * & ttg-r- * A<j±m <* 



: DBC(x— ?<7>;g£) 
A 1/yX?- (7) t*-y h 7#*1 fc 
■b tf t'T* RAM IZ X ft «b (iV -T 
>RAM (ZPCM ^jSt*— ?#S 
^n5„ AU^^-Wf'y h 1 
£L"-y h 0T\ ?>"?*) >#NS& 
fBtSriS^TSo fc*fU5.75KHz 
(i N turbo R #R800 CODRAM ^E— 
KT^T^3%£-fcWi 

00 15.75KHZ 

01 7.875KHz 

10 5.25+KHz 

11 3.9375KHz 




PMDAC 

PMCNT 

PMCNTL 

PMSTAT 

SYSTML 



EQU 0A4H 
EQU 0A4H 
EQU 0A5H 
EQU 0A5H 
EQU 0E6H 



LD A, 

OUT (PMCNTL), A 

DI 

XOR A 

OUT (SYSTML) , A 



IN A. (SYSTML) 

CP E 

JR C, REC1 

XOR A 

OUT (SYSTML) , A 

PUSH BC 

LD A, 0001 1 100B 

OUT (PMCNTL) , A 

LD A, 80H 

LD C. PMSTAT 



;A/D MODE 
;*9Vr0 



;DATA HOLD 



OUT (PMDAC). A ; BIT CONVERT 



RECAD0 : 



DEFB 0EDH, 70H 
JP M, RECAD0 
AND 01 11 111 IB 

OR 01 



IN (HL). (C) 



RECAD1 : 



RECAD2 : 



RECAD3 : 



RECAD4 : 




OUT (PMDAC), A 
DEFB 0EDH, 70H 
JP M, RECAD1 
AND 101 1 1 1 1 IB 

OR 00100000B 

OUT (PMDAC) , A 
DEFB 0EDH. 70H 
JP M, RECAD2 

AND 1 101 1 1 11 B 



OR 00010000B 

OUT (PMDAC), A 
DEFB 0EDH. 70H 
JP M, RECAD3 
AND 1 1 101 1 1 IB 

OR 00001000B 

OUT (PMDAC), A 
DEFB 0EDH, 70H 
JP M. RECAD4 
AND 1111011 IB 

OR 00000 100B 
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ft 



x-)i ti^hcMurbo R 



PCM 



PMDAC 
PMC NT 
PMCNTL 
PMSTAT 
SYSTML 



PLAY: 



EQU 0A4H 
EQU 0A4H 
EOU 0A5H 
EQU 0A5H 
EQU 0E6H 



PLAY1 



LD A, 0000001 1B 

OUT (PMCNTL) , A 

DI 

XOR A 

OUT (SYSTML). A 



IN A, (SYSTML) 

CP E 

JR C, PLAY! 

XOR A 

OUT (SYSTML) , A 



;D/A MODE 
;WA0 



LD A, (HL) 

OUT (PMDAC) 

INC HL 

DEC BC 

LD A, C 

OR B 

JR NZ, PLAY1 

EI 

RET 

END 



A ;DATA viV'li') 



PCM^£:?n^A 



lO/K-SSJSCRead/Wrlte] 


Blt7 


Bit6 


Bit5 


Bit4 


Bit3 


Bit2 


Biti 


BitO 


0A5H Write 
0A5H Read 
0A4H Write 
0A4H Read 




COMP 
DA7 






DAB 






DA5 



SMPL 
SMPL 
DA4 



SEL 
SEL 
DA3 



FILT 
FILT 
DAE 



MUTE 
MUTE 
DA1 
CT1 


ADDA 
BUFF 
DAO 
CTO 



•ADDA (BUFF) u n>-7t*-K 

D/AaWC-^-CfttbT^tSgLSf. D/ABS 
(SO (5''7 , ;UM-.y7 7)s A/DB^lil (•> >^;U/\'-y 
77)i:LT</:?^'i-} 5 \ U-te-y MSHi?'?';^ 



•MUTE:^-r>f>: 

L- /; 'J L £ T, 

:^^ttl**7(Ut-y M§) 

1 :^bH2)*> 



A/Df$(c+r>7'ju*-;u KEHSIzAtoT 4ff-f 
ttm fti: f£ <J i To U -tr y h mt o r-r 



P-/a7^^-CA*t5(l§?- 1 D/A a> 
^■§-CT%*^iM^L JTo OTD/A 3W?-^- 



: Ht^^K'J-b'y t-B$) 

1 : *-/U K 



+»->7*JU*-;i/ vcnmtim^t D/A 3>/t— $>— 

: D/Attit) > V>7'^*-;UKtt* 

1 : D/Affi* < ■9->^;U*->UKtU* 



•DA7*^DA0:D/ A tB#f— * 



•CT1, CTO^^V^-r-^ 

63.5^«>C-i:C*t7> h 7 -y 7"? n S to D/ASp 
(;«*■?> h T-y7'C (B)«SLT0A4HSifeC#^n 
fcr ! -5'*^UiILfcti^$n=t-r o 0A4HlZ-r-:?£ 



t*<!:HJHfcttrPCM»&T75SH:? 



^ildPCM^oT^s^S 

B, MSX(i-f(7)PCMS±(7ytt#i; 

( J t&fr ft l x L , BG M(7)>^#ft £* fc 

U *■* * i U y— A {Z-fi&a. ft tvfcf 
*> -5 o ft^ £ ?!rPCM£P§ £ L St** 

BGMZ'M£$1t£: U T'# ftV» fc 




#fcA,tj!rMuSICA£PCM*fj£>i:: LfcLv 
tax ? filiTLj; ? 



***>*#»& ^fc^fe, us 

0>tf<5? h 4£1 ctstv MU& 

LTtJUiA^TWrSt, FD9AH 

fpT'PCM ^-b.,1 ^tci *<T # n 

ft H^filJt;— ^OTHRST'PCMt' 

*r * (liiiMSJ «; &<*• ) „ o i u % 



'IVDttWfi 



*¥j6ffl«»IOi&&*ffi5<!:^ 
fcix.«4 3-r>2t(cSiJ0JA^^ 

©SJl/-? 1 >©4T b i^X^ 1 9(Z)fit 
SHOiSt+lilUtoH-too 



^rsct c**sBfew*r**^ 

J5Slt(Z 7K¥^^lifiJ t JiA^ 

■h->7°u >^v- Mz&if-r*£ 
^ t frmnz^-tz \.\ tzt mis 



'90^1 0^ -^TIS^- L fc r MuSICA j 
X\ PCM(7) K 7 A^B.1 b -fr/Cb fc* 

^ r 7^LT<i,T'Lj: ? ^ ft 
^ t t)-T* $ ft I ^**!*+ ft <7)-C x 
4-m(7) r ^^c7)Z Z ^> j(Z>±g L 

nswctis-rrpTSiifti^o -t 

£ & a (t 2fx fij 'J iA^^Uu-^ 
>W4>T\ *— h 0A4H#ife(ZPCM 
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**L3*** 



NETWORK 

*yh9r-*-*:SC^:or*, MSX turbo RH\ 
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fc3t^>,RB00^-KCDBjS1ftC«fc*iB]i*-«S^* 
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mLX^Z>AlZ£r>X. tztffth 
thm>\->mZs MSX turbo R (ifcL 
T, MSX turbo RXiffiiZ ^ 2 tf® 

>blSS< fc£(7)/r ? - (7)JgHH]lZ 

£$*£« iIHtc^A. 2 C*^ MSX 

? %WgTZtztb<r>-7n PvA&U 

5 *&*§* v V fes SB5cS ^ 2 £ 

fl**y Yn-<7<n*7, hJgfcf^J 
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*&#& * nx i * & c i: fc)§* -y 
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THDDH >? — 7 x — 7. t 3 > 
t°a-^ "J +>— 74±<7)CRC-HD2A 
(20^*V\'-r h)COHDD, ftlCA" 
■TV- yfOl^TAti— h 'J -y v 
FS-CM1 fc I v$ *&*-&*3-B-<7) v * 

OS Us fc £ t> £ MSX-D0S2_b 
TSftL^Tl^-5(7)T* % FS-A1ST<7XS» 
fcO<7)7.P-y HZHDDO? — 
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: #3i*^rSct; MX-KMSX2) 



3-cTyf -<Tc7)fi*!## iA^. (^36 
+ P/\*< h)^i»WtzSt*.»>l 
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mmiz7 t <<*?frh'&Mt£-7 7 

•f JUtttft* MEM DISKIZ$E£U 



mm 



FS-AlST(turboR) 
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MX- 1 (MSX2) 
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FS-AlST(turbo R) 

19© 



r 
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7x— X£FS-cm&MLTkibl& 
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*WU *<7>£ £R800^- MS 
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7c£ ^ 2 tSFS-A1STc7)R80u^E- 
KTraS^<»f^Lfco 

fc*** % * * h "* >- >#> "o 7* ? -tz * 

U U (zl— F-) 37> KT-R3& 

<7>§SffS»£&#£ A (#- h ?*7 
>□— F)37> FT-^o#|:f 
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(turbo R)^1^J> **J3^<7) 1 <7)^ 
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NETWORK TOOLS ISM 



fr-UYT— t> -Y / \*— t ~7 7"T -<Ua > 



(J, FS-A1WSX£FS-A1ST£f£ffl 
L/Co *fc» HDD1st!fflB$c:&-5<7> 



LHA 



ver. 1.04b 

36+ □A-i' hc7)o^'7 7"r;i/?r^ 
7>J^TC0i7+n/N''f r- (47A-- fe 
>h)*Tffifi|T*#fco 

«fc'Jfc«ftT^4„ tztfm&ltE. 
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J: fro FS-A1WSXT'(i, 6t>33# 
t^T-S^ ::*>£, FS-A1STT't=t x 
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FS-A1WSX(MSX2+) 
6 #339 

FS-AlST(turbo R) 
1 #299 

HDDffifflR 589 
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LHRD verl.iif 
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T^JUkSMU yKnyr-tMz 
MttzHb(D-fO^' ; 7AtZc, T&fcfh 
*$f/<-S>a>(J1.1in\ *-fA 
*?>7*«|||*{\ MSX-D0S2WS 

bts. £fe/*va >ilfi* 7h9- 

Hl&OfS^ti, FS-A1WSX#2 
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FS-AlST(turbo R) 
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HDD^fflBf 229 
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LHA^if-fSctTU, 7"-* 
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i^%Ali£i\, LHA^^fclsji; 
< % ^36^= □ / x'-f h (7}fciS* 'V r- 

WP^T-THffll, ^160/ \— 

iz>Y(nf±m¥-^Wz a 

J±«llzA x *^^WT(i % FS-A1 
WSXT'2 7>9#i:iIl\ FS-A1ST 

blZ, HDD£f£ffl-f-5£, ;bf> 
18#>T^7LTLJ:-5o 




FS-A1WSXCMSX2+) 
2tt99 

FS-A1 ST(turbo R) 
1 #289 

HDDtefflBf 189 
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1 


UNARCtJ, ARKlZjc-oTffiit? 

titzy-j-fj^mmi. y&ttb 

7"ny7A. 7v , -'7x;r£LT 
g§i $ tiT i * •§> 7°n ^*5 a**^- 
?C(i,&81ARK£f£fflLTU£ 

^ftt£JH& FS-AIWSXtfSSfeK 
F5-A1ST#43#>fc:fcI&J!»^£: 
*>*>C HDDf£fflB#<7)7#£l^ 


fcS^lai 1 


FS-A1WSX(MSX2+) 
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FS-A1 ST (turbo R) 
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HDDtMBi 7 9 
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\SHit' N'-T 7^ U -5f$5tW 771" 

fr&Mt* HrMtza >/•*-!>■?■ 

* 7°P ^7 Afc„ HI^IZ5i73*fiS 

lEWttWh &<7)T\ a v n >iiff 
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::m LHAtZct^TJBiL 
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FS-AlST(turbo R) 
31 9 
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<7)y ^ ^ g — jg^(z^f Z ^ A<T 
$*. ZZT'tiillLh, /KUec:« 

$ T, ISH<7)^^(Z«FS-A1WSX 
^42?^ FS-A1STA<2fflU>i:i^ite 
^^tbfco UNARC(7)£#£[5]i;< 




FS-A1WSX(MSX2+) 
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FS-A1 ST(turbo R) 
289 

HOD&mm 59 



*— ;u if-y [- MSX turbo R 117 



7Q05S>fl#H 







IS $ o T L S -3 fc<7)tix *HSfc« fc* 

fc < #;ff I- ::st§ fca*> 

<7)^A $rfc9b<to£¥< >£#"£ 

RPG £ i ^ £ 1" <- CHl <9«\& 

tf3fcBeU f"ILU;b«s££bo 
Tl^TLS-7. -^CTilti'ftL 

J8S£$J L C t* < " 1 I ^ tzWMo 

^znt£% *smtz-)tMft 

tim.mzh-oXLZi *zx 

*m±*<r>$3W\ ^a # &*. tztm 
X\ f\.\£JJlt&iWBt&&j:^x1z 

-vju/zit^' S&, :tiT'fe 

— "tarn. *>y?j»T.mtt 



fr 'J ffir0>A<7)flt*»A."C L £ ^ $ 
SATLfco «Ay*ft/fofcffittx 

<Z>#li::*7-<Blg«tT*. *-(- 
1&%%M L T L * o tzCDX'to 



IBbb^JS £ * L fco *SS fc£ L X « L 
JElz-,fLv.*fc$-t*-Cv.*/S:IE*<7>*Sai 



•5 ^ zA,tebA,tzteo z<n* 
h-U— (^ tf—i±<n*— ~7°-> 



1 VyyUbfcTfcStD^xA-W&CDrtf 




0. ^^o 




1 . -\X^5E 




2. •'K^e'turbo R 




s 

3. #:l5e>c7)Ufc 



4. fi&c7)©i^^)U 




5. fi*XJy&CiL> 




6. ro(Z)St)L 



X * t \ / z^" 



/ 



\ \ 



7. TMtVOy&Oli 




i. <kz 




9. XU^Vf"^ 




10. Z-D(D-DSb 




ii. ttfrocttor 





^2 



13. £U 




14. cfcD 1 



c 
c 




^^7' 




c 




sf^S 


•> 


15. 


cfctf 
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7P055>ft:»l 



fc-y ^*•'f>K«THP)^ 

•*> < * "5 2 

(HHTfSo 100<bi^&? 
•*> < * ? turbo R 
HPfc*> <*? 2 J:y *f>(Z|al 

£-C*fc£-fz:*:tzLJ:-5o 

C(7)30^*M00i:^(7)[el^[fil(i % 
itt<7)5ii$^i^<7)=jgjW(7)HP(zj: 

£LTfcl^ ££*CMs§f<£« 

v-y^lfc+lzte-?^ »££ 
i%*ofc«*THBT* £**i5 

7 —A* tefflTST'-fxAfcL 

•To<7)St>L 
•WJcDSfcL 



• <'A/T 

»***<!> L-bPSo 

;»***<* at j:y»i\, 

#TO0)O#> 

wtMWwmx 

3e£2j£t§s 

S7-f TA<7)-mh:l-t t\ *HS7 
-ffA" ta«LJ:i £&<7>j«[ 
(7) *N -v ? " £iij-f EG£ * t - 7. 

<7)^ > y > h " imw$ s s c l 

T, 3« h-U-C7)^*Z^T'^tZA 

&£& £A&fcA2KC? 7° 
p^Ani:l iz *"HT <7)x U 

^fcflF^Tfc^T, 1ht1rhT4 
T-A«riiiPT*# 3 «fc -5 ttflBlC L 
T£(*UX*l*fe 

7--f t- L.m&<ny° □ ?" 7 A £fFo 
T^ct-?o ¥*W2£fc. ^ <■?*># 

*\ft< *>*Wfc^ ;:£*<&*>«, 
©vyy^^Ti^^tz, t 
-r^Afcte^nij^-rsfr? 

^•5^oT*iJ!SiJ-rSA N ? 
(3)7 •< t 1 a ^-^a s t#t s «t -5 

(ZLT, f-(zs^-r-s>^? 
^z-r^A^^zAn-s^i^ ? 

J-f®tZ^^T(i, V-y7°?r^ 

i^Tos £#(::;*'<— **— fe$f 
Lfc<b, 7--fT-A£fs^&y!lzA 

©liT^ x A(7)^ISIJtZ#-§-?r 

o[+ s ^<7)#^T5jaJWrrs«t-5C 

5rAli13fl§ ^Hi£3 0£-3T N 



Listl 7^2x0>«3*»# 

5 DEF1NT A-Z:DIM MB$ (5) , MAS (63) , IN$ (15) , 
IT(7) 

6 KEY OFF: COLOR 15, 0, 0:GOSUB 9BBB : WIDTH 
30 

8 X=54:Y=8 

12 RESTORE 30000: FOR 1=0 TO 15: READ IN$( 
I ) : NEXT 

13 IM=8:F0R 1=0 TO 7 : IT(I ) =1 :NEXT 

20 GOSUB 5000:GOSUB 3200:GOSUB 10000: GOT 

4000 

1010 LOCATE 1,11:PRINT" fW 

1020 LOCATE 1,12 -.PRINT" -f *-" 

1030 LOCATE 1,13:PRINT" 7W 

1040 CY=0 

1050 A=ST I CK(0) : LOCATE 1, CY+11 : PRINT" "; 

1055 IF A=l AND CY>0 THEN CY=CY-1 

1060 IF A=5 AND CY<2 THEN CY=CY+1 

1065 LOCATE 1, CY+11 : PRINT" >" ; 

1070 IF STRIG(0)=0 GOTO 1050 

1080 C=CY+1 

2020 ON C GOSUB 2500.2600,2700 

2700 M$="t-t ±vfA+A\" : GOSUB 3000 

2710 RETURN 

2800 ' fX 

2810 ' fX 

3100 IF INKEY$<>"" GOTO 3100 

3105 LOCATE 15, 22:PRINT"»" ; 

3130 IF INKEYSO" " GOTO 3105 

3200 'TMfA tsW 

3210 FOR 1=0 TO 7 

3220 LOCATE 16, 1+7 

3230 IF IM=<I THEN PRINTSPACE$ (14) ; ELSE 

PRINTLEFT$(IN$(IT(I))+SPACE$(14), 14) ; 
3240 NEXT I 
3250 RETURN 

3500 LOCATE 8, 11 : PRINT" EH=" ;EH 
3510 LOCATE 8, 12:PRINT"ES=" ;ES 
3520 LOCATE 8, 13:PRINT"EF=" ;EF 
3530 LOCATE 8, 14:PRINT"ED=" ;ED 
3600 LOCATE 16 , 1 : PR I NT" LV : " ; LV ; " 
3610 LOCATE 16, 2: PR I NT" HP : " ;HP; " 
3620 LOCATE 16, 3: PRINT" ST:" ;ST;" 
3630 LOCATE 16 , 4 : PR I NT" DF : " ; DF ; " 
3640 LOCATE 16, 5:PRINT"DX:" ;DX;" 
6080 FOR 1=10 TO 16: LOCATE 0, I :PRINTSPAC 
E$(15) ; :NEXT 

30000 DATA *<*5,*<*32,*<*nurboR,ia}0Ui 
30010 DATA iXMibl.t'bfiibl.X'Mtbl.UP'Wibl 
30020 DATA <'^,jMJ*W»*,T-90Oft,W)0tt9T 
30030 DATA f -Xf)\- V9' VY, IV-' , XV , llA' 
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7 7t-m7"Dy7 5>yi:f+! 119 
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ULt(D^SL(n^M^ DIMXlI 
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#tz x /-ffAi^^T'n^? 

A£iiin ZZTfplM^^^cT)^ 
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HR!B$<7)3'7>K^:^ i§fc7>7 
t— ?7«7F&rzUteo 

3200^*7 b£\ T47-L&5$.<n 

Sfrfro Mtf7 < t- J±<nWi.<r)^ 
WbMK %ro\^X.\,t. rr(o)*rb 
IT(I M - 1 ) £ T*<*»« OPfot L T 
^Z>)T^t1±£1^ ZtHZt£2> 
323(tfrT\ C<75fgHrtfc«b7 , -fT- 
A££, |EB*ttCb14fB(7)7.'<— 

350WT*7bM<757x-?7£, 
3600*tA x b (£ £ *<7) 7. r— ? ^ & 

t^U^So ttz, mBRtfe 
7B#(Z? 'J 7- LT Wzx U 7"&; 
6080^X^5 LTU5 
$ b Hi&§SB#(75 =i v > |?£jp fc 

^*- VJU^-Tig^S J: -5 KM 

X\ $hK^^X'Ks S>£» 

(D^rY^MiXLt ofc ^£(75 
^tWc £flE*tffc < T fc^-Alz 
&U*~5#<7)T\ PnWd. % W::*>-5o 
1000fft7«b<7>1r"70u— -r>"t\ 3C 
ffcC#2ttbE3u ZMhT-if- 

¥*l£&fe&t\ 2020^(75=17 
>K#tftfcCT«, 280Ofr^b<757' 



(75&-?fc270OfT77-bC*» ^ 
II, 280OfT^b<757''fxA^I« 

(7511, INKEY$i;*fc < T STICKS 
t^^TCL/:^ tf?tlfc 
*—#/<? 77-Cfc ^TLJ 

7B#(757'<— 7 *— A£l£f t>(75g|3 

ct^o J:1*3100*T£3105fri::&U 
31 30fr(75 G0T0#% fe 31 05C» # 
^;L$ *LT3100*TTv\*»y7 7' 

Sfcs y-f-rA^gUk— ?■>£ 

b7^TA^|-?Tl^(7)T\ 20 
^T(75V>y 7^7F<75& £ <*bl N lZA 

£T N ^Tv^Vvitto ^7 7°?: 
£l*Tl^5££* 7.^-7*— £ 
|fTC^T'7^fA^^ &5 

*-J:-9o SfcC AfcT- "tai* 

i:7-ffA?rfy' ^I^rfF-S)^ 
£ *>#*.* «*Uif -5 tt^7';U-x 
>fcffl3ft-T5o fcl^-t^ flF 
nXfrtzOW 1 )** 2tz 

f-f^V-r^A-feU-^ h"(75M 
So U 7 h 1 T*^:£-frfcT-f x 

Ada— y;i/££*>-t*\ HflH+tf) 

3?> Fai^(75j:-5(Z7'1'7 1 A^ 
ilvS'-9-70u-x>/co *— VJM* 
— <7)_k.T"CKtirU 7^-7*- 

i§Ufilfzli^&C£^i\ Ofcf 

A#-§-+ 1 £&To Ctl^3300^T 
^bl-S^-^Tl^o 3320(Tti*- 
U tf— h^its 3370?T* < *-V>-fe 
;K75^Ifc* 



^< 3400^f^b(75Ht7*;U-x> 
It. *7<f AtU^ MBT. « 
fuM-<?LU7£\ 330Ofr^b(75 
Ht7*JU-x>T*^^:? tire *> " v 

- ^ fcx BOI^-r * fc*l7(75 1> (75rfo 
337C«t(75 n GOTO 3400^ X^^T' 

B?t/ttiLTi^(75fci7ti^x :n 

(iGOSUB 3400 : RETURN(75^B& 

M zoLtzmx-vy'j^-^>^ 

Urt/WT t #(ix GOTOXXXX^B 
WLT7 , -fxA*fi6ofcU«rCfc 

vv7fflMm<nit\:tos izv 

400OfrT'+-7 + -^>LT, 7^ 
-7+-*<*f?tlTun^410(WT 
KfRvStJ: 7 irt*o 410(Wt*^*< 
r-f 7 s A^Hz^-5>^l7/c 
£-f'j£^j:(7577\ 7 s ** A ^rfj 

t?h 7- Lmat n u «t •? ^*oat* 

SHSl \ WKfe + *>* ^k 1 r-' 

i:«-5, 2/ft*tT%i:LT*fco 

T$if#f*rM s 'a^(75T\ ^-c 

GOSUB 4800^H^TLrz$)^:,+ 

(75^13(75 37> K^>S1"*sai:lH| 
Ufcw^Hfi-U 400t«TtzMntf 

iu\ c (75 =i v > k uiifms 

■f-7'JU-x>HLT4^-5/z* N b, 
l^^TLJfcio ff608C«T 
(75Mii^610(WTl^l-^L, ^7' 
)U— fWttlio *^4 % b6080fT 
tt x GOSUB 6100: RETURN ^"T^ 
#4 % <7>^tt^ 6080~610Ofr(iv^ 
0-5(I-?W-3"CU&(75T\ 'JV 

•5 4 b 420C«t, ttT % 4 b 450Wt 

mmtzt, wwnx-fflftr'tT 
as** o tt b, "^9 T-r t- aa<& 

US-tt^' ?r^^o rtlC(S3000 
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)\s-T>fi < feZ.*0tz o 
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DYtiOlZlx^L, GOSUB 3000 
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^tT*+-A73#^>^ 1000(WtT*7 
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v>K^^SB*<7)>S*x 340O?rT- 
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£tHff&*fe 3(75— 31(75-17 7> 

|5]i:fc(75?r-f^l^-5 4:(75T\ 4600 

abXti^tz a 
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;U? tlfr b 7--T 7 A «r^-5 A^T 
4*^<7)-bU^ hClS. T\ 4230 
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m&miz-mtZo 

tzVmtztiiftiXfrtzo 4240^^ 
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4280^tA <j ^ < ^ 1 turbo Rfc ^tl 

fi-jTfe, fir fefec«b ^t^-5 1- 

4290?rT-^MLTfc<o 

[Um(75^S^fF^ T ^TfWr-3 
t*fcft2^ HP(75SAfil?r>^«)TU 

fit t L T 9 frT^S* 361 OfirT'fc 
HM^^tf-T •§> «t -5 I- L/Co ^ *l"C 
SbX'tzi, 4250ff(75HPA < HM?r^ 
il^l^ -5 Ct^ftra^ 428(Wt 
<75HP$- HM(7)fi| i T'dHrf %MI 
A\ T'#?)^(7rCo 

$T> 7-<7MZ\,ti%^tzht£ 

§(75T\ P^LTl^7 7 'f7 i A^ 
glJ5#£I£fF^o WuWTe&ff 
^b(75H770U-x> o wJ|t#W 

BrrtfUfe 74 xAi»u^ hit 



120 77t-ro7D^7i>^:|+! 



7W55>5fePM 



U C- 1# tf-tz U ? h £ ft fc IT(n) 
Wntt^TStiWt Ls C-l# 

^A<7)gfc(IM)£Mb-t IM*<0£ 
SfclM£ifc'bLfc*S^ C-1t(l] 

frblM = 0, ^T^)7 7 <t-A#-§- 
Ufr&b-f 1 IzftZfrb. C-1B 
0T'IM=C-1£fr-S> o 

IM = QT\v£fcO S ^r*tTfc%&<7) 

1T\ cft£>iM=c-i£&-5 c 



ZC7)^lI1^ < 4720^t/c o 

t A^^ £ "f b L T ^ -5 'M?!r& 

1 # g , C=1 £t£T fc*£fc £*(*, 
IT(0) = IT(1): IT(l)=IT(2)^U-5 
^£L£ltfttfWfci\, :ti 
#4730*rfc* o 

h LT&3 (7)7^1^ Ji(7)15iJ4 s 
^ H^(3IM=2, C=1£ftALT 
5f*r#)3;b(tfc T^^A^-fb 

■rA?rSS^:LTRETURN Z.<Ti 



<7)<biMiLT s &£l2trt&M 

T\ f^T<fr7c(7)#4500fp!rb 
CO^io £*ffjlIli4200Wb(7) 
T -f t- A £f$ ASS £ 7c I *fc I ^[5] 
C&0£tf& 453fffTT-7 7 'f7 i A 
WNHHHU 4540^tT^TS- 
£(7)T'#37 7 --f-^AGD&! ; II£ s * 
L T 455tff TttT 3 Z £ <7)T'# # 
iNT-f r A<7)&£!£^-? TUS 
&£-§-£ T'C7) 'J* Ml MERGE L 



l vJ £— LA N L^F*3(ZRPG4"f± 
_h(f«fc -3 £ 1*9 *><*>&«:> fcS 

z.s $>£W7?z7LTHTtiy 

?-mnfrt£^<nX\ 3bt2*ftT: 



List2 -p'OrAvfemmm 

8 X=54:Y=8:WY=18 

9 HP=lJ0T0 : HM=HP : ST=10 : DF=10 : DX=10 : LV=1 : GO 
SUB 3600 

2000 DY=0:NF=0 

3300 '?MfA ±V9h 

3310 CY=0 

3320 IF STRIG(0) OR INKEY$<>"" GOTO 3320 

3330 A=STICK(0) -.LOCATE 14, CY+7 :PRINT" "; 

3340 IF A=l AND CY>0 AND IM>1 THEN CY=CY 

-1 

3350 IF A=5 AND CY<IM-1 THEN CY=CY+1 

3360 LOCATE 14, CY+7 :PRINT">" ; 

3370 IF INKEY$=CHR$(13) THEN C=0:GOTO 34 

00 

3380 IF STRIG(0)=0 GOTO 3330 

3390 C=CY+1: RETURN 

3400 '74fA MMY iiW 3 

3410 FOR 1=7 TO 14: LOCATE 14, I : PR I NT" "; 

: NEXT : RETURN 

3610 LOCATE 16,2:PRINT "HP: " ;STR$ (HP) ; "/ 

";STR$(HM); M "; 

4000 X1=X:Y1=Y:IF STRIG(0) GOTO 4100 

4100 GOSUB 4800: IF C=0 THEN GOSUB 6100:G 

OTO 4000 

4110 ON C GOTO 4200,4500 

4200 '?MfA 7*9 (MAP) 

4210 IF IM=0 THEN M$="7*«7 T-ifW 79***": 

GOSUB 4600: GOTO 4000 

4220 GOSUB 3300: IF C=0 THEN GOTO 4100 

4230 ON 1T(C-1)+1 GOTO 4240,4270,4280.42 

90, 4290, 4290, 4290, 4290, 4290, 4290, 4290, 42 

90, 4290, 4290, 4290, 4290 

4240 HP=HP+30 

4250 IF HP>HM THEN HP=HM 

4260 GOSUB 4700: GOSUB 3600 :M$=" $\ Ua?*' il 

All)/ 9" : GOSUB 4600: GOTO 4000 

4270 HP=HP+ 100: GOTO 4250 



4280 HP=HM:GOTO 4260 

4290 M$="t- ; t t^filff :GOSUB 4600:GOTO 40 

00 

4500 'r^ffA Af/MMAP) 

4510 IF IM=0 THEN M$="AfA' 74fW 7W±V" : 

GOSUB 4600 :GOTO 4000 

4520 GOSUB 3300: IF C=0 THEN GOTO 4100 

4530 ON IT(C-1)+1 GOTO 4540,4540,4540,45 

40, 4540, 4540, 4540, 4540, 4540, 4540, 4540, 45 

40, 4540, 4540, 4540, 4550 

4540 GOSUB 4700:M$=IN$ (IT (C-l) ) +" 9 Xf9": 

GOSUB 4600: GOTO 4000 

4550 M$=" M-\\ \f)\ m 'J UV9 XfbJK 3V7j" :GOSUB 

4600: GOTO 4000 
4600 DY=0: GOSUB 3000: GOSUB 3100: GOSUB 10 
000 

4610 GOSUB 6100: GOTO 3400 
4700 ' (C-l) a' v J 7AfW Xrt* 
4710 IM=IM-1 

4720 IF IM=C-2 THEN RETURN 
4730 FOR I=C TO IM: IT(I-l) =IT(I ) :NEXT:GO 
TO 3200 

4800 ' 7 Ark yM/Zfb ±V1Y 
4810 LOCATE 1, 11 :PRINT"?Mf A f" 
4820 LOCATE 1,12:PRINT" VW 
4830 LOCATE 1 , 13 : PR I NT" Xf fr" 
4840 CY=0 

4850 IF STRIG(0) OR INKEY$<>"" GOTO 4850 
4860 A= STICK (0) : LOCATE 1, CY+12:PRINT" "; 
4870 IF A=l AND CY>0 THEN CY=CY-1 
4880 IF A=5 AND CY<1 THEN CY=CY+1 
4890 LOCATE 1, CY+12 :PRINT">" ; 
4900 IF INKEY$=CHR$(13) THEN C=0: RETURN 
4910 IF STRIG(0)=0 GOTO 4860 
4920 C=CY+1: RETURN 
6080 'GOSUB 6100: RETURN 
6090 ' tX 

6100 FOR 1=10 TO 16:L0CATE 0, I :PRINTSPAC 
E$(15) ; :NEXT 
6110 RETURN 
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&&»*£• T<7)Hl1*Jt.T(5U\ ) 

char array [10] ; 
HtMLtttklZ^ array [0]^ 
h array [9] * T'<7)1 O-fH^gRMtffll 

# arrays I >3 v^MAs WRfMb 
p<7) TYUTs £ jgBfcf 3 o fc*#* "b % 



ptr = array; 
£-f3£v ptr£l*-5;JW>*— 3E 
»£ array [0](7>$te§17' KU*4ft 

ft5<7)ft\ T 7 Ki^ffifci^ozi: 
fcbl fcJ6Cs M4i5iJ£<fclfT 

fee -5. zziz—mrt&0V3 < &%a 



1 BSfiJd^KUXCDH^ 



array 



[0] 



[1] 



[2] 



[3] 



[4] 



[5] 



C6] 



[7] 



[8] [9] 



chararray [10]; OtST^iU array [0] ~array [9] JTWIO/f-fK&fS**** 
{t«?n?)» *l/£ *array*i:L^7^Ht, -C7)gE5IJ(W$feIS7'hV^^:LT^ 
•5,, T<7)U^.h<7) *ptr = array* T-ThV*£ftAT S-ttCtt-So 



tunc () 








char 


*str = "F 


ointer" ; 




char 


*ptr; 






char 


array [10] 


• 




strcpy (array, 


tr); 




printf ("%s¥n" 


array) ; 




Ptr 


= array; 






printf ("Xs¥n" 


Ptr); 




n(Dhut -oovfi'jkX'\$h% it t\ 

fc*<b<*SKfc7)AUu mVi 
U@#&U£l£7irm ^3K> 

g a<#i -x h s «<- v^^Dt-^ x 
^L^T^-^^T-^^o zft£ 

IJ N B#lz#^T&5* il@(7)^ 



biut-o%nmmuzztiz, 

itz :tit), #A,#AM:<I$^ 

il<7)fc<7)£:£ N 1 ^<7)CDtC10^tffl 
if Z fr h 2 ft^<7)fi %M # fc ^ £ 

i * -? *§£\ fcv, \x i ^airciis S 
tf?>£2[e]*f-f^ 2Mk<r>% 

Pir <blf.lt £<£ -5 CftoTl^, 

V K u *•;*!#* £ ^ N -5 <7)li z n 

IZffilTl^o &ltZ\h[$t'Z\t>- 
L X, 7FU *>Wt*( * ^ + 7 7° 
^ char, m\t 1^-5 T^-fMtdo 



IHE 7tt-f>^-S»©%x7? 



char *name; Z(7>tST-!i, namett>-5^»(t\*<»tt#-f >^-T, *tf>#< 




???h 




char *name = *T.Ac 
tmftH'k* namei 


yama" I 
l^-5S!lJ[l-l*x 






j T 


■ A 


O 


y 


a m 


a 




t -Z(Z>5fe«7Ki<x***MA**i*e 






xttPVBfRMC £ -3 t a- <£ "5 o 

*ti<bfcflfefcLtl^ 1#1#0> 
7*— fit* ZwiWifft. miS#-§- 

wrtiv, tzwmn-B S'ftctt-*? 

(BrtCir&ffiitLt^SAfci^fr 
feLft&^o z^i^^^i^ 
<7))SS L fe r-- ? (7)H * U £*ft -9 

x®fnm&mf&<7M*mfxfrtzo 

i>**r-Tt\ fclZ?fJ&gr? 
tzZttfhZfrK ? z<7)feizr 
Umv-><7)«> SA^tzlfc^L^ 

ifrAfc^Cfc^ofcAtfAotl^ 

&%„ fciz?»Jfci^<7>li&*ffJ 
u:z:-H^*a£fc8*>fcA < 'bs L 
*" fe 1 AfcttC ? U £ L t # U ±L 

oti^, :3^l, ziiA,, 
(7) »J £ i n -5 <7)*<*j{z r U £ i ^o fll 
itftW^lt'fc 5^^:if:o 
?Ltz<7)fifi£#izte«;?ti£ 

w*{*As COM} /PfcLtifci^U 
{ L * Its zftlf 3fctA* ^ 9 tt I- } 
a*t>Lti&%\, :i-H v -)#x.^£ 

&v»3c &£$<$#>£(?& ^n 

z£tzLi-? 
Tftfc 'J* hi £<frt(5Li\, 

"struct* £ I*? 0»jW61HS o t-» 

SP^/fo ^JWrcfrfcAtzti^tt 

DO&U X h 1 t'tiP3s#£:£^ 
1153(7) struct A^IS<7)SI5^T* % 



%>tZ.hfz ^t(Dht(Dma\r\l 
<7) 4 1 "Ci&b ti t L N 3 struct*** I » 

int a; 
fc> U (Z struct addressbook £ I* 9 

8b6*T # & £ © 1 1 £*, struct t 

foZZt fc«?EJrt % tz tb<7)M£t£ 
(Dtz V * h 1 <7)ffi|fliBII(Bc(7)rt 
£*Hc#itti.*Sttti£\ f^t 
**■£«£ Lt:twT3Z£tK 
/Ififf^St^^TS z £ h^imtzo 
z:<7).s»fc-3<7)iii^zoi^t(ix 

J^BUl#BJLfcZ£#&£<7)t\ ft 

iz# < * 0*t& %&Z#&llT 3 
z£(zj:^t* JljjFrgiBc£***£ 

£i^£z*>iz&$ ztUi, £ 
< <7)M»t*|i| C«i££*#-?x-? 

3ct*2feS 

St* fc-5— £V* r- 1 £&t 

ti^ttti^ *a8fl5a*few^*3 

fc^il^J:^^^, *."t*|gtfti 
T i »* z J: izW)^ i ^fc (it* fc'o 
Ztitis VN data1.name"(7)0iJtl^ 

i:* «it#T--^^Lta:=?n 

fcdata1<7)INJIt**)5 *name" ^ t* 

■5 z t u(Dtz a m&fcn&mm^ 

£ II] U /z^ >b E < tzBi^ti U4l> 

3d<7)ft Ati7C^:(Z %*J Wlvfc v» 
•5aSA^t-A%o 
Z(7)(5*Hzt, «t#c7)^^i: 

0>£fo ^*i^#Ut:<^^ 'J^^ 

2lZ^i, D ^*(7)miZM(tt^^ 

z*nTzzi:x\wmm(z 

Z tlistruct addressbookM^ i- N 
7LZ)<7)g!&<n* datal£^L7c 
ZtlzUZ>(Dtz 






fuj*ai3 



^«B^Em*aiB-n-i 



03-486-7111 



104 ^iH$addressbook©*# 





#include 



<stdio. h> 



struct addressbook { 

char *name; 

char *address; 

int sex; 

char *phone: 
}; 



main () 

{ 

struct addressbook datal : 

data), name = "K. Koizumi " ; 

datal . address = "Suginamiku" ; 

datal. sex = 1 ; 

datal. phone = "03-{ 



IUXH 



printf <*''<-20s¥t5<-15s¥n", datal. name, datal. phone) ; 
return 0; 



#include < 


stdio. h> 


struct addressbook { 


char 


♦name ; 


char 


♦address; 


int 


sex; 


char 


♦phone: 


} datal : 




mai n () 




{ 





I'JXSE 



datal. name = K.Koizumi ; 

datal . address = "Suginamiku"; 

datal. sex = 1 ; 

datal . phone = "03-( 



printf ("5«-20s¥t5<-15s¥n", datal. name, datal. phone) ; 
return 0; 




m 






h 3 £ >iS L T (5 L I MDtS, ~ 
«7) «t -5 KflffiMtfcfrfc "5 £ # C& 
staticJR1££7£ftT(2^(t#v.^ 
£ tz static^ lA? 0)ltmm!t.£ 

fc*f; y.xh 3 (7) j: ^(z—^n 

"typedefllW^-cfc -?T, $fLl^ 
§!£LTmLTfc< fcSfeCb 

fir L l nU« ^^?Xfux I » 



FILEJS14T*^ $ ft 5 7 7- -r )\s * 
Ci «it#(7)|e5lJlzoiNTMnT 



*3* x Steo Z<7)%£\ is]i 
*jitt<7>* < >? -g&* JIT I * 

i~t * £ £" o & s <nith io f £K 

W<T)T—?<mz:£ IZBW) L T < ft 
#Wf-?^liLT, B'AOtt 

C Tii z ft £ *- > 'mU* £1$ 
o T*>fr 'J ^T < * < C £ *<T'# 
5<7)fc*„ *<7>WJ* h 6£f„ 



#include <stdio. h> 


■UXK4 


typedef 

) 


struct addressbook 
char *name; 
char *address: 
int sex: 
char *phone; 
ADDBOOK ; 


{ 


mai n () 






ADDBOOK data [2] : 




int 


i : 




for 


(i = 0; i < 2: i++) 
switch (i) { 
case 0: 


( 




data [i] . name 


= "K. Koizumi : 




data [i] . address 


= "Suginamiku : 




data [i] . sex 


= 1 : 




data [i] . phone 


= "03-0000-0000": 




break: 






case 1 : 






data [il . name 


= K. Koizumi : 




data [i ] . address 


= "Suginami ku" : 




data [i] . sex 


= 1 : 




data |i] . phone 
) 


= "03-0000-0000": 


printf ("!<-20s¥n*-20s¥n" 


data [01 . name, data [ 1 1 . name) ; 


return 0: 

> 





# include 



<stdio. h> 



static struct addressbook ( 

char *name; 

char *address; 

int sex: 

char *phone: 
} datal = { 

"K.Koizumi". "Suginamiku", 1, "03-{ 



ILUK3 



main () 
{ 



printf ("X-20s¥tK-15s¥n". datal. name. data!, phone) 
return 0: 




#i nclude 



<stdio. h> 



typedef struct addressbook { 
char *name: 
char *address: 
int sex: 
char *phone: 

i ADDBOOK ; 



IU7.S5 



main () 



ADDBOOK 



♦dataptr, data: 



dataptr = &data: 

(♦dataptr) . name = "K.Koizumi": 

(♦dataptr) . address = "Suginamiku": 

(*datapt r) . sex = 1 : 

(♦dataptr) . phone = "03-0000-0000": 

printf ("H-20s¥nS«-20s¥n", (*dataptr) . name. (♦dataptr) . address) 
return 0: 



#include <stdio. h> 


typedef struct 


addressbook ( 


char 


♦name : 


char 


♦address : 


int 


sex : 


char 


♦phone : 


) ADDBOOK 




mai n () 




ADDBOOK 


♦dataptr. data: 



LUS6 



dataptr = &data: 

dataptr->name = "K.Koizumi": 

dataptr->address = "Suginamiku": 

dataptr->sex = 1 ; 

dataptr->phone = "03-0000-0000": 

printf ("9<-20sKn»6-20s¥n", dataptr->name. dataptr->address) : 
return 0: 



finclude 



<stdio. h> 



typedef struct namestr { 

char ♦myo j i : 

char ♦namae: 

) NAMES : 

typedef struct addressbook { 

NAMES name : 

char ♦address; 

} ADDBOOK : 



mai n () 
{ 

ADDBOOK data: 

data. name, myoj i = "Miyazawa": 
data. name, namae = "Rie": 
data, address = "Ohtaku" : 



IU7.S7 



printf ("Myoji : %-] 0s¥nNamae : *-10s¥n", 
data. name, myoji, data. name, namae) 

return 0: 







7. r 7T\ *ADDBOOK*£l^« 

ftttftffiltfe *names* £ i* 3 « 

<n£Tizwm**xhtZz\t. 
tf-VZZo tztzU S-frg:§-£* 

'J ;* h 8 ffo 

-fc£3Hfc LT *.***> Wtf„ 05 

*-*m®lfelzW)Mt>itX\.* 

typedef M"-?- E *3 1 » T 3> L IS L 
Tfc:i'-) typedef £ 1^-5 <7>lil!£ 
=fe(type def ine)<75 Z £ "C N ftif 
-^S**S^LfcJglJ*-Cft3 - 1 
dT$$ MSX-CT*liint char, 
unsigned L*T# I ^ft£\ «i£# 
HfctypedefT S Z fc T\ iM 

typedef int INT2 ; 
&£*<7)cfc 7 KSIJ«T&? Z ^ fepj 

t&fcftt ar; m$ <ffl&zttt. 

*ftfrfc*BWMca0JbT; & 

3grr^#^^^{f"Cfez-5 ^(7) 

§#t*£fc^iH£ ftA£TS*& 

X\ «t<«*3tl5^atZs ^-7> 



#include <stdio. h> 

typedef struct numbers { 

int i ; 

struct numbers *next; 
} NUMB, *NUMP: 



main () 

{ 

NUMB 

a. i 

a. next 

b. i 

b. next 

c. i 

c. next 

pr intf 



a, b, c ; 

: 1 ; 

■ &b; 

■ 128; 
= &c; 

: 4096; 

: (NUMP) NUL 

'%d¥n3«d¥n%d 
a. i, 

a. next->i, 
a. next->ne 



return 0; 



L: 
¥n", 

xt->i) ; 

l'J*K8 



#include <stdio. h> 

typedef struct parameter { 

int a; 

char *b; 
} PARAM; 

main () 
{ 

PARAM *p1,arg; 

pi = &arg; 
sub (pi ) ; 

printf ("%d¥n56s¥n", p1->a, p1->b) 
return 0; 
} 

sub (ppp) 
PARAM *ppp; 
{ 

ppp->a = 100; 

ppp->b = "This is test. "; 

return 0; 
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flt£& C(Mffiizmr&&&lb 

£o * tilts tGHtkt\rt9H* 

ztt z(ntztoizim<mzt: j ) 
lx h&Uz^m^ut, fir*v< 

-z>t £ -^=Mzmh #z *#$t\ *> 

lU-t-l&'^S —9 — t LXs 
Wfef¥ki8ttZi:1)*X'£%\.*£^ 
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nxn-fifetfrt -f > ? ->£ L £ i ^ 
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^/^^-9-tLxmtztx\ 
w-9fc*)» mzmzmMLtzv 

ttLXffi&&£*JtittfeX-t>Zo 
i *%&*<& 8 0MMR& * -f > 

*-;£L<7)$J£LT, U ^. h 9 ^r 
h*7-f >^ib<7)/\°7^— ? — 0>2fc 

|^ffl7°P^7AtZfcm^LT^< 



IH5 WWMW5y<h7K-f>^- 



data [0]- 



data [1] 



data [0].name 
data [0]. address 
data [Qj.sex 
data [0]. phone 
data [1].name 
data [1]. address 
data [1].sex 
data [1]. phone 






— a— 1 — a.i 



a. next* 



T-bj 

I h.next c— i — Cl 



■b.next c- 

•c.next 



rl£ zntfUf-x—siztj:** 





I 
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fofet\ \Lr>(T)tZh\^>T-j 
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4-^ C±ftrH3(7)A/Dz3 >/ \- ? - 
H<7)M# T'To 4HKJ X A/Du >y < 
-9- *M%%s ZLXtiz^ZttT 

A/D3>A'-^-^fKi:i: 




5L^5«as«ur»*-ro ram:/-!*- *>a*iz:/-0- 

(DZ\ ftlb^fo^ U5lV53l£Ur»*U«fc5o 
v ? JHttcXtt L T msx- BASIC 

fcftlimiRkT*»«Afc£JRut 
Its^ztiztis foots bi?>fr 

sf P sua, mcEx }S£&£*£^ 

x-to zftt><rtiffl*W±izmi 

Lx^nts; A/DP>/N-^-ii 

x- ? £ L T15t*ljl5 3 £ *<T'# 
i-Tttx A/D=I>/n*-?-c7)*IJ 

mm)m$£.X'&z>w±s «3t ® 







■*iw-ACDaiiu 

^^(ftm^^fcTcSiT-r^ ? ) 

(ZW*)tlfcfc<7)T*f /N—F*7x 

■&A,T*UfcA\, 

^T'Tx Z(D 
St— 5TJ& * 

fc**r«b£u-3 



-itmmLxtsztzi^fs^i 

to y&S8H>Ti^*r<bx *#*! 
fir* tfc-oL^^fci^^ 

c: JtflJT 5 * i: t v-5 t> <7>-CT c n 

(i1827^tZ K-f % y<7)*ja^%<7) 
G • S • *-A*<fgjl,Lfc;£J!iJ# 
c7)T*To 1827^^1^-5 £ H*"Cl.* 
-5^>lF^ftc7)3tai0^x *>-# 

§ l < a^^c^t-t ( u o« a* 

£*<##£& )„ 

E = k • I fcftijito — T\ 

I «H3!t(^.'(a:ti7 , >^7)x Eli 
ms (mfclitfju h )x k ttifflm 
f&k&LX^tto z<nkz*tfs 

mzits ±.<ngnt, e= i • Rx 

I =E/Rx R = E/I tl^lJ.1 

(xt«l^Tfcx+#{±S^fc<HI 

£#"?&^fc k iz(2JjL<£tJfc* % -? 
fcc7)T-x mMMcn&izmi^x, 
*— a t^i HMk (a) &$£ $ ti 




-5 te<nxTfi\ Tm<tf) *- a 
(Ohm)? Ac7)M5;^(i #<7)T\ 

t-x ^Jyt^T'^S^^*' 
(n)**TTx *— 2*£&&trc 

*> ct o t $fi&UWkmi XfrZ 
tzttXbs WE0&mE&1b*4*' 

b( v )(2*ju? K ? U 7 A)Cx 
Wfixn^-iiLXh 57>^7(A) 

777 K(F)ti77'7T-'-('r+' 

'J *A)Cx 3-r;K7)< >^'^ ? > 
7. (7)^-fiT* & * ^ > U - ( H ) ( £ 

T'x ■?ft-rft^££tiTxA£To 
^KglL ^ r t XtA. t£ i Hit Xto 

jt«5-r*c, fir^<7)if%i.^tsf* 

BJ * L fc Afc *> ^x7)T-r o * & /i 







A-K&X7WM6 



MMk^KiT^Zfrb Lft£itA, 
&fc\ H*AT- *>*>**,£*•& 

C0XT o ^ntit^/cUftT'LJ: 
9 ? t> Mi******* 
(ftA)XTo 

*> J: l^SStflH&LT L £ u £ 
Lfci&V thfri, *-ACD-£PJJ 

4F?t § £ s W& 1 ^ >t-Ti?3$Xi 

z&fanmmtf 1 *-&t*£ ^ 

'jis#x#5[2-fx-t 

— «£#»:: lix *- Aco-iiy £ « x 
<«if#lE£Jt0V U ffi&tffiCS 
JtflJT * * £ 5fc a, X fc < £ m\\ X 

USE* *fA,&!|#fttf&arfrt^ 
•5 i: > - tifrfc terimW-V -y £ 
mftLVT < UZ> £^i z. £Xt 

if o 

Sfev A/D3>/N*— ? — <7)A7J 

— AiJ&5£,fbbft5<7>X\ ®a 

Z. X\ C <nf& A/D 3 >/ \*— ? -co 
^J&tff L Tft* >t«6 3 £ £ K 



«-f tfcmEwfgftt-E: L x^ 3 
cote, U-pizfc^T^ztXTo 

1 w £ *> u , imm 1 *xmt 
HttJcxtiMsfc i cor ^xi* 

« R K3fcfr4 £ #*. & £ v ffii£ 

ztui, *— Ac7)>spjjxai^'btL 

Xi^ct^-co££XT 

£ % EWICjKliMBft I £<nrnx- 

-x<T) x. i f&Mtik y ±l% £ to 

I = V/R 

o £ tj ; A/D =i >•/ \- ? -XiUJ 
£ 3 ^MIEEftft R Xf B fclBcfit 

a\ ^aosmM^sfritx-to 

fcfcjltfc ffi&fcSffC: 1 *- A<7) 



feCO£fflUtU£ A/D3W<-^ 
— <7)®±tSH Ci v -T ^- ^ 2 . 048~ 
7°7 7. 2 . 048/i-OU h * X&COX, 
v ■{ -f 7. 2 . 048—2 . 0487 7 > ^ T 

%%£ LXffll^ 2 £#*£# S*3(t 



#g£ L S fo 2 COI&X& 5 P (7 -y 
h ) (i«J± fc m>7rECO«i:: $ 3 CO X 

to zftfc^fcsiJb-rfc 

P= I • E 
CtlC^-ACO-iPJJ^rflJfflLX I 

P = E 2 /R 

77^7 7COffitttl^l^4it 

ttti(87>C0 1 ^-y h£*T47><7) 
1 "7-y h(7)fc(7)) ^r^-5 £, 1 T 

7LTL£lZ£izKi)£T 

itsbX 1 7'>^7'*TM!Btb 
fcl^%&lis 1 *-ACO%£-Hl2 
^li^l.X 2 7 -y MacoJ^Jt^^r 

10*— A 2 7><7) 177 b (X# tl 

u -5 ) cojstjtts £ 1 o»5iJ i^MI 

-r-5^^ 1 *-A2 r 7-y h(7)J£tt 

s^Lxffli^c^A<x#s-r 

Z<7)&fe 'J <7>HtiEl JffiWiCft-gT 
§ " i: C «t oXX# Sti-fXTo 



tE<Z>»JS73^ 



v -f -^ 7 2 . 048~7° 7 7 2 . 048 
,-fOU h <7)SIJ^|EH U thtl L > A/D =1 

>/\'-^-X(iv — uaw^ffii^ 

(iT*#S-fr^ MSXn>t°j.-^ 
— F*ggP<7)±W®±(ix 77^5-f 
JU h I?? °7 7.12.1-^U h XT Ls ^ 



•R v 



Mb 



ADH>M— 5>- 



HS 



+ o- 



S 



% 



R 2 v 



ADU>/\— 9- 



TT 



E(7)^;iia >-tz > h iziiACioo* 
juhA^A^Xi^-To 
VK'3 >-iz> h (iffiW-t LX, 

XliiSiJ^Lfc^-fcl^^Xl-o 2 

fflHR l £ R 2 <,£mynzi%m$ n 

X\,^(DX\ : JiftZ>Wm).3ML < 

viPJJ ii J: r> Xs W±lt l Qffi.£&tii 

imzttmr s ^ i ^ 2 ^ ^cox, 

:>^:fc^ -co[HS§ 
ti^/±St*\ frJ±MW.£Wft 

taut. 

A7J®±V^R 2 (OMiffi, f«ft) 
13 A/D =1 >/ <— ^ —JWjBBtf •& m 

Z£tfT-Z£Ti 

R, + R 2 
V = x v 

R 2 

v mortal <7)££^ %±^ 
£'2.000*^ h £ lx-;ij^:x# •& 
£ y t£K£ ti. < ^^A^^J: -) C 



®x.S-TA\ *<ntzMz\i., R,= 

90+P*— A N R 2 = 10*n:t— A 

tz^A* mima-mt. E12 

^5U i: *\ E 24&5IJ 1 1 ^o tz$&\\ 
[z&rS^xfthftX^Z b<ntfX 
*t£(r>X\ zi^i mtWk<» £ 
z^X^Hz<^(DXTo 

Xb, ^'\jLX < fe*£ IS LEDR 
TFtff *ffl£®Xi ? -fr •& DVM (9»S? 
5)\s7f,)l,VS— ■?—) till \ A/D 
=1 >s<— 9—0)7*— ? liCPUXg 

Xl-^"b, ZC0ti^-J:b^6W# 
Bt¥4ia<7)ffiJ/C?|^ffll^ 2 £ W 
X# STo R,l-100+P*-A s R 2 
(Z10+P*— A^rffll^Xfc, VCO 
f^t^'1 0*P b 1 1 Cftf? 5 filt^0 

x-r^b o 

mmo)Mzwmi&mt.-%' 

■a■^A<^ ms^jiy^sii: lx« 

l^^"bt^ R1tR 2 co-^|-Kil(^ 
#lM Iffiltt LXO)X^mM. 

#<**J:'5U:LT<*!*-tN, R. 

t R 2 CO-g-If{iS(i10+ P *- AU 
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il<7)DVM<7)*I^-lZ(2'7 U £a8t£ 
SZ:£(Zfc*<75T x 08&I&ffc7)iJi 

*r-?Ti^ffi£tst# 1 *&fti& 
**p<7)igsjfcs^jBjjs:-r * - 1 tfx- 

3(7>|sB&T\ BEfckDfilfcfcfc 
R^ 3fc*n<7)£*/tte£Rx£LT, R 
£Rx£it5lJlZ&iJiLTi^glZ 5 
ffiJUh0)WE&Mnz£$lZ s Rx 

<7)iEiSffilZ#g3E-f &®±£A/DP > 

a— ?— T-aij^:-ra<7)"CTo -<n 

Rx 



v = x 5 

Rx+R 

Rx[Z-D^xm< £ 

R • v 
Rx= 



vlJO ~2.048*;U h <7)$Sffl flg 
Z<7>T\ Rx<7)iPJJ^tgH(ifcJ:-Tf 



~o.8x r (n)(7>fEH*:fcy ir B 
a ha, z<»wv # -a £ si * $ -f 

"(7)3 fcrfrfc, R &100+P*— 
AtZTtllfx fccfc*80*P*-A 

st\ 1 y^-Aiz-rntfsoo 

* p #— A £ TSttt* 5 c £ A< 

*>*>*£ J&t\$fo Z(7)[US&<7)^ 

;uj^(7) t z: h *et>mi Ltz £ *j y » 

Rx= <7) £ # IZ, ft fc R <7)>8Jt 
«****# < #3<7)T\ RlZil^ 
(7)8-^7)1 7-y h^"f7°^$fflL 
TL^^IJ, 200^-AJ-^_blC 

L fc it fttffc y £ -a- a,„ jjctfz o 

W±lt&$ U 7 7 7^tZ^'b^UC7)T\ 

T# 3*W±^£ffi;t l re y x 

ffl-ftLT, f*&£ffiIELT*S££ 
-hlf * J: 3 {ZtZt l^X'L «t o„ 
7°P ^*v A±.£f IfC**^ y <7)f£IE 
^TlS^t, SffcLfcA/DP> 
'<—?—<7)tfGE%\.^frtfA,lZ'$> 
■oX^tz£LXh, Hffl_L(ira® 
iz(ifc<b fci*i£i*T-r 




1z>»-«WHUck5l 

*#)#*££* A/DP>/\-?- 

% T\ * wz y C|fcK3Eo «f T- 

«f)*\, nktz^XtiX'to 

ff: £ Ibbfta fe <7)(2 13 ^ A, £ S 
•aWfrfiSfiSftTU-S fc(7)^<7)T*-fo 

7 tZx *W«* 3v£UUz tztfX 

>y—te £*&& y * l fc #a-tr 

>f— A^tt, «Es m>;fu Wa. 

mmmmm Lx^^<m^$ 

-<n&£A,£'^ h%— •fcnmts 

tZ>llX? 

fc& •lz> H t-CO^|(zJ:-oTL; 
o(za^Tf ii^(i, A/DP >/\' 
— 9— (7)bij(z s ZHhtn^t^B 
^^-fttzjlLT, t£tsfrr>A/D3 
>z N -_ ^ — (7)fflij^tEH(zjK«)X ^ 
S^&ct^MUS&^'jZ^Iz^j f 
■to fr(zfcai^Ti^i:fcy N # 

l\ A/DP>/\*-^-(Z-^x.ibtl. 
BASICZ^P ^7 A<7)|WJBc£*IJffl L 



a»tz:/t>— «e-3 

zcx\ -tz>i7— i^ffl0iJi:LT, 

T t>* J y fcfc L^ < t£^(7)X\ 

LT&3c«>:lzL3:-to 

3 z t*k y jstfsanfefe >^- 




#'j^*SMt>-y--T-r, ztimm 

1 1 blzm/imfr&igizmaT & ben 




tlX^ZCMOS}Mjkiz>y-— \CX 
$>^>S-8100BT'To C<7)IC(iv< 

^•fe>l7— TTo W^tt3*J£A< 
tHT^^^(1-T\ 7 , y-(7)/JvMh 

^4ti(7)Tt. Wg|2l«lll5<7)t 

fcyx-to 
iffitiii^iia ( j v < -f ^ 40^ 

~l00Jtfj:-3Ti^,rtgP(ziat 

•tz>t»-- K^-f7'fflOP7->7; 

^^tms&A^/a? tit i *■& <7>t\ 

WtttSl5 n n p^ LT'^(7)S SgPf^ffl 
T-#TL*t^ifo Z.(7)-b>-t- 
<7)tH7J®±Vout£SJgT a<75M# 
(S ^7 7 1 (7) £ fc y T'fo MT(7) 

i:fcy(7)-^a|gSMbT\ l^«> 
5 Vax+b" tl^Wr&tifrtZ 

ZZX\ y^-Vout, x£Ta£T 
5t a=-8.lxi0-\ b=1.75 

t^ys-r t-^A\n^z(iic 
cz «/ \*7 ^y * *<#> y , ^tcott'— 

^v-h(zj:?)t, Ta^'v-f^-^ 
20^(7) t # (Z N Vout<7)ft>JMfilJ 
1.884,1-OUh, ft*fit(i1.932/^U 
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$tZs 7°7;*80J£CO£#HT**k 

EMMiSlii. 07i/-tf;u K 03M* 
^.^\^&R)\'b kte-vt^ffo z 

jt(*v fttzT'fciis*.cfiFfJwrc 

t><7)£tt % )«LTl^fcJiT-to 
^1 $.XbK^Z£frbLti&it 
AM fe^THr-^Ktfc*^ 7K7K 
T'^-t^-^X ? )C tt «b & ^ «fc -5 

DVMfflt LTRtfr3*l"tffefe*l 
fcfc<7><7>J:-5fc<7rc\ ?i^M 

t3li±^t^'A/D=l >A— ?— <7) 
1SI8BC t°-y ? U £ ig£- L X ix 
*LfcM *tUW)*&&tt* ^ 
(J U ^±<7)t- ? - -y ? & £frMl 

tits ^mmmx-zi-zAsTL 

tztfs iz>y—(-±r>Xtt£'lL 
XbOPT> 7°£l£ffl L tf I* £ *U 
fflT*#^lxfe<7)fcA»Ji1"o *3 
l^fc*&£-T*t> % -b>-f— fW0) 
7*-* v- h & *T£ J: < Sfc*>& 



fj=ie*c:ij-c#*-t*AM *-H* 

r>tzWmz&l,\.*tti.s ifV-T* 
U>v LT^-T < tz£l\ Ztitz 
fy^E-oXfrtzhs W^^hX^ZZ' 
-$g£ ! ft^XZTo 



■SWfcfr L fc A/D =3 >; \'- ? - 
IH7)T\ BASICT-7°P^vA^l 

a,t *, (5 £ a, irras(i5fe 1; flu. m 

tX-tt)\ t'0 LTtBASICL:^ 
Gfc ■? x < 3 (if T'-f ;b #*» S* 

wwaww^-^ > ^fF Mr < X 

bs MSX-BASIC(7)>I§^JU-f->T* 
&3Math-Pack£*IJffl-f 5 £ l*V* 
^t^HTo Cft£f£*t£ *>«* 
ft £'^3 «t 'J lit* -5 £ ffi^l-, J? 
»'J M&£>W$>=a KJgy u— ?■ > 

c <7)>n®i BCD-riT^n-s fc«\ 

Xs mm&£ *rc bmmxTo 
zi 1^1 s 0'\0 zx-tetx b%k 
<rmmts zoi^-vstx-ami 
L#ft£v.wt\ m^M^^z'W 

/\ > K 7" v <? *\ MSX2 + x- ^ 

H'b>- , t-(is tifc<(DW.7cJ£X 
— S-8100B{i200P3(^4JSIJ)"CL 
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fcJ|Lft*7x^ 5*tBi; fe<7)^ 
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msx^p^vh 
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DantetDSStaJfc! 



-^/v&JbltT*, Dante©>fE,S£- 

$s©*im c l i r ©-c>£t l t 

<£* l\, ¥LT1i^£fM a q£& 
*TAKERUT'|g9rT * ^T'To 

ft^fx ft^ 3M& W£#t#if 

IBL fc fc©£|5]£J- L X&-o X # T 

+ -v h £AftTfcWz©T\ m&F. 
(DfoZAUWiX <K$\.\ &k 
I** MuSICAH»LfcDante£#g 

g£r*iC£>uA,*f * -5 it t\ <c* 



#acge>nr£fcfts 



fcUfc, flc&©#»s&©#BB!i# 

ru«AI*x =65— *^7-r:>£ 






THIEF/JPHSttSA 
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tzfi\ BOTi^4»T180SiE|ll-rs, *> 



WarcussStory/3iJllit& 
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130 PROGRAM HOUSE 



pROGRAMQOUSE 



fiHS3C*#^ 



ZCD-1-1— li^HCDBASIC^P^V-SJiWr 



^^-^-T'tHT # fcAND£ frXORfc 

em 

0>WcA**K=> £-f(2 2iii&<7) 

Of ^T6t*-y h (16-7-?CD2ii$0 
-32768A^32767t"CT*AS fc% 

zzxmm^U£^ \%T9(ni 
t<ntzhifrl RLC 

PRINT BIN$(-1) 

W-jWIii: , &bbbbs 

*itiiinnimiu*o 1****7 x 

7£16<BfcMA/T'LS-3fco (S^ 
£lZZn^C7)2Jt»<7)? 
2 it^Utf^z fc tt 3 &0>£fc75 



IZfrltSPv^./Utf^U — V3> 

if £ X fcllll^T; If 0- £ 
b%7LXS5^X&L\.\ 

x, h^zw&%zw&m*0& 

<nm>lfrtz*%.z.&0 o 
1 6 tf -y h <7>$SHT* 2 Jtifc7)^o 

s* st^r %g\ 2 (7)1 en ( 2 mm. 

izUTt *1 0000000000000000") 

tz£z.&-'\*zm®HzmLtz.^ 
%£(J, 2(7)16l|v-r^-7. 1 £2 
it&Tff#TtttfUlvbttfc*o Z 
ft SrUPglZft^LT <&£>£, g/t 
l£*1111111111111111* (5— b, $ 
o# BIN $ £f£o T!i^/z £ $ £ 

m 1; *tntz ftofctLi, z nx\ 
t y &*.? m<7>ite 2 jUKTAb 
■fr*«k-5C4;ofctt-f*fo 

7h^n7P^7Af; i§^ 

mmz&tz~3\f}TZ£* wa 

&%\ 2Jtg[£10iifB[Tga.££ 
7FLT<tlSo a<7>&fc£;LTx 
t£K£^£'::orfrA,T-fcZ -5 



* 

1 


nsflWI/TKU-^ S/a> 


m m 




PSET(*B&fc 


, TPESET 


**JfctfTflK 




PRESET 


JPRESET 


*NOT(ffiSfe)-C*»< 




XOR 


,TX0R 


*(»*fe)XOR(*t^fe)*Ttt< 




OR 


,T0R 


*(*ftfe)OR(*g^m)'T-»< 




AND 


JAND 


'(ITJcfe) AND (#!:£&) "T'ffi< 



100 SCREEN 

1 10 DEFINT A, B. S 

120 INPUT "A=";A 

130 INPUT "B=":B 

140 LG$ = "AND) ":S = A 

AND B:GOSUB 200 

150 LG$ = " OR) ":S = A 

OR B:GOSUB 200 

160 LG$ = "XOR) ":S = A 

XOR B:GOSUB 200 

170 PRINT "NOT) ";RIGHT$ 

(" "+STR$ (A) , 8) ;S 
PC (5) ; RIGHTS ("000000000 
000000 "+B INS (A), 16) ;"B" 
180 PRINT " =) ";RIGHT$ 

(" "+STRS (NOT A), 
8) ;SPC(5) ; RIGHTS ("00000 
0000000000"+BINS (NOT A) 
, 16) ;"B" 
190 END 
200 PRINT " ": RIGHTS 

(" "+STRS (A) ,8) ;S 
PC (5) ; RIGHTS ("000000000 
000000 "+B INS (A) , 16) ;"B" 
210 PRINT LG$;RIGHTS (" 

"+STRS (B), 8) ;SPC( 
5) ; RIGHTS ("000000000000 
000 "+B INS (B) , 16) ;"B" 
220 PRINT " =) "; RIGHTS 

(" "+STRS (S), 8) ;S 
PC (5) ; RIGHTS ("000000000 
000000"+BIN$ (S) , 16) ;"B" 
230 PRINT 
240 RETURN 



100 SCREEN 1 

1 10 INPUT "i : / MD fl " 

;FC 

120 INPUT "AO-f ; <n a 

";BC 

130 SCREEN 5: COLOR FC, B 

C:CLS 

140 OPEN "grp:" AS #1 

150 PRESET (0, 0) 

160 FOR 1=0 TO 255 

170 PRINT #1, CHRS (I) ; 

180 NEXT I 

190 FOR I = TO 15 

200 IF STRIG(0) = 

THEN 200 

210 PSET(0,64) 

220 PRINT #1, "V/ 

";FC; " XOR"; I;" = " ; FC 

XOR I 
230 
240 

";BC; 

XOR I 
250 LINE (0.0) -(25 
5. 63), I, BF.XOR 
260 IF STRIG(0) <> 

THEN 260 
270 LINE (0, 64)- (2 
55, 79) , BC, BF 
280 LINE (0,0) -(25 
5, 63), I, BF, XOR 
290 NEXT I 
300 END 



PSET(0, 72) 
PRINT #1, "A-fH 
XOR";I;" = " ; BC 



UcfclA* 

LINE^PSET, COPY&£*<7)^ 

uz&.£i$m<n&£ ^m xmm 

#%ff%t\ ?(DfeWX£tz-&$: 

m7r;£-V:Z>mZK<ntz muzn 
i>l3)\s*'<\s—>a><nW&£WL 
miz-Di^XS.£sbXiS^tz -ibU^ 
tz, u'jwu^r^-u— isnx7>$ftJi 

II *T" %-Z)tf&& ffiMLtz&tf 



a ><nfc-m 7°p 7vK 3G££Wi: 

<7)fe^A77-rs^ -?&-z)$mm 

<D^.t>^ior>X^«Dtz\ ZCDZfQ 

7^LX'\t, mmmzxoRzm-o 

T^5o X0R<7H^£Z3Cix — S 

h sfi t-^^: l xmm (D-& & * 

tz&£izbi-m® IMXIK&Sit 
%£, H®A < fct(7>feliM^T<ft 
%>Z£tz\ -$C£<nmi.U£'\zi%n£ 

mm?* 



Mf% j t>mm&w^>ti\z> : £i 


BASIC LWrSSBIA^ofc 
6, a«tt-rC6ECDffiBf*ri3: 

mixm&TLtz^o -enA x b, 
(Dmm&n^mfr-ttziz u l\ c 


^ 1=107-24 

m«a5^Em*iiJ6-ii-i 

^ MSX^ZJ^>«8*aJ 
5t BASIC©W«# 
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HtrlalOTSWtiVRAMw^— v 3 

ft^— v (:t^t5^-f> 

®-Wzf5J#T'#l t £ fr* -f A £ 
85"3fc<7)T\ if£ll(rF<7)££>Uo 
Kl7°n <? '=7 A(£&H*StfcLTA 

I-HUJ (i#& St^T S fc * (Z MSX 
^<7)T'T(7)tt;|lJ^m(iff it £ 



bJ) frSt-ti^i - £ izfr So BASIC 
T*fflS$tl-Cl^TIMEKIlBc«x Id 

<7)4 3 tzAoTl^fil?r^t7> YT 
%3^7t>tfT\ MSX£2£fc 

?<, i5A,£ti7°n?*7A£itn-f 



wiffim®kiZl~K 



Jft 

2ft 



3ft 
4ft 
5ft 



5ft 



7ft 



7ft 



9ft 



9ft 



5 « 



^tflJJfefBff: 7XMX* 



wmmmmfo w 



sj^m^j^m JiifM 



SJWRgHW 



=F*JII»6Wr& HfflSfcKfiB 



f^HSAiim #±££E 



tt^tum /TO£ 



«H!lHJim sti 



S5S i£ffi 



'Jvfflgt*! 



1^^ 



SM'A 



7 #15 



7*!>2B 



7 #60 



7 #75 



7 #75 



7 #78 



7 #78 



7 #81 



7 #81 



1 ffifdW£7D?7A£tff 



<\'-y* 


vs ur/ 


H 7. 067 t' 3$ 


U' ->v 


fcn* m* 


A=asci i 


cord 0-255 


D=y (dot 


0-204 


E=x(dot 


0-248 


W J.9i\ 


XV f*V VX* 



MO J I 



LOOP: 



PUSH AF 
PUSH BC 
PUSH HL 
LD H, A 



RRCA 


RRCA 


AND 38H 


LD L. A 


LD A. H 


ADD A. A 


ADD A, A 


ADD A, A 


LD H, A 



PUSH HL- 

PUSH DE 

LD BC, (0006H) 

LD DE, 028FH 

INC B 

INC C 

LD L.C 

LD C. B 

DI 

OUT (C) , D I 

OUT (C) , E J 

LD DE, 209 IH 

OUT (C) , D 

OUT (C) , E 

INC C 

INC C 
r-LD H, C 

LD C, L 

LD B, 03H 

LD L. 01H 

POP DE 

IN A, (C) 

AND L 

JR NZ, LOOP 
I— LD C. H 

POP HL 



-R#15tZ2£«< 
-R#17lZ323r^< 



-H(C) PORT#3 




OUT 
OUT 
OUT 
OUT 
OUT 
OUT 
OUT 



(O, 

(O 

(c) 

(O 

(O, 

(c) 

(O 



OUT (C) 
LD HL, 08D0H 
OUT (C).H 
OUT (C) 
OUT (C) 
OUT (C) 
OUT (C) 
OUT (C) 
OUT (C) 
DEC C 
DEC C 
OUT (C).A 
LD A. 8FH 
OUT (C) , A 
EI 

POP HL 
POP BC 
POP AF 
RET 

END 



7-7. X, Y 
fe&7%X, Y 

NX, NY 

CCR 
ARG 
CMR 

R#15£0i::T£ 
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{ZLTU37°P?'7A«: N #g<7) 
ttMfrhlZJ\XLXtil^tzo Ztl 

w;i&>»^ N1 b 

tfuz-t5<7)k?v ^o^u^ 

^■LT— ^ir^iz<nh\ *■< 
>R0M<7) 6 #*&£ 7 #M1&<7) 
5UHJ 7 +f fc* 6 #H&7b<M<friA<frffl 
^-fx-hZKUT., 7#ititfr## 
iA^fflc^tf- h 7 Y\s*t£A,-tztf 

t\ z ntfMz-o thm \:mx'& 

?'^A*\ 6, 7#±fe(7)rt!g£i^ 

7 P^AIJ, mttztft'Tfryiz 
LTfcWc 

6, 7#%<7)fii£irci:&tV7)li 
I^f tz ft £\ II] UffiSrSflft L Tfp 



^7tAte1$Ll\!§U^£LTU-?>7!r 
kLti/jriv ££k 4-c7)MSXT^ 
T (turbo R£-a#)T)# : [^i;tfI& 
c7)TfBlit^^ < m < A7clt£; # 

%KA,X'frhi£i£i, i±mxim 

htlX^ZA,tzfrh?MzQ£^tz 

iiofi^mzo 

Xit, sf^i7°n^Ac7)!#a££ 
LJ:-)o Cc^yp^'^A^iliN— 

IZ N ^v^^17(Z32?r#l^Tl^•5 
d £ fc-tf Z ftTSl < & 5 <7)*r£ 

VDPc7)-f±*^B#r B n"E-b7J§ £ v 
^^#*>> 3 "7 > KC7)H^T (ISMfF 

^, P V > K <7>Hfo C7)^ UiSL 
tz\ =iTi<7)-7*P^7AT*ti, 3(75 



KWWaAittK* 



r£;trss9±i:fr^fco 

X¥A*->8 K V K x8 K y K 

So ;r*ifc*w-'e*-fA#i8>K<!f 
«<aSo«sc«*:-3rB(A k ao 

(5gbnfc^^fc'ij-if)^x.s^ : feo 

->£VRAM©^-~7'3lzgU 



; DY 
TKJT (C) , A ; DP 



LD L, 6 ; NX 
LD H, 7 ; NY 

OUT (C) , L ; NX 
.OyT_j£J 

53M£;L&l\9tf7cl:J-£teo 



£#CPUlS9i— K Uv*?17 
tZ32£#<, ilSMx-?©^- h 
^©fcB?j N 37> Kft*T©*p*fc£ 

ft^7°P^*vAT*(i, ZOilsit 
*?17(Z32£«<, ©S&7>£7x 
— hc7)Bu(iKt N Tl^^)(to ^£ 

miZ^iXltiftmzfrh, t 

<t£t><7)tz *>fra? fcea»< 

VDPA<f±* £ L T U -5 Pb^CZ T* # 5 
z^j-t^T^TLi-K eft 

fcfc\ Sil7°P ^'v AtiflJ U iA 
^Sit L T I * 3 1$ W ASBT #' 5 o 

mmw-L-xm t^mnmm 

(Us^^^15«rOK:LT**fe ! )lz 
*DI", *EI*£-f 3^#7!rfco *S 



pHOGMAM[f(USE 



ffiS/7T^««^ 



^-rA^jisfzifjsfc&izy:, 
fe«»»& Rs-wzcftmif-Dtz 

<DV. Vtt>OlZM\D\?0)\/7.<D 
(DmS=E- K C90*P9E*§€#JH) 

Msx^^iz2^M^r, *n 

^ftCMIDI-y-^JU^^S-To 

-fc'o 7n^5A^^ff-r5iu^ 
lz, eDfi^^ttiTcfcolz^p^ 
5A*ftor*©HPH£MSXr 
»J§t3l^o 3n*&iE»*!o 




LU VDP^ISMt i-5! 



4'[i]c7)7'JUP* l jXAP>^7. h x 

i:'?f;o/:T'Li-)^? VRAM 

VDP^-f^tNZ^-ttS «t -5 (Z^S/\ 

x^* i:C3&>< *VDP^i 



■S>\ Z; tl^rl^ t)^II(ZSl^T7° 
P ^*7 AT-5 t ^^tzh 1 t£ a 
tzfz\ 4-H]c7)^S7°p^AJ; 

^? amtiwiftf^ 7x-h 

c7)^-9-tZfcl^< ibA^PB^^^-S 
-hlZ^^-S^PBUv VDP^pv 




ZQlzmTztc iEfiitzlio 
«b^l^-)lzL, OtzMLT 



/ 






XOR 


A ; 


A=0 


OUT 


(C) 


A 


LD E 


, 80H+15 


OUT 


(C) 


B 



BSite • 7§ite©fii^gl«) 

Zftlt$fritz 6#im^ 

7#itc7)rt^^|5)i:fcc7)^i: 

^LT7*n^7ALTl^ 
MSX(2Sl«£*t7JlzL 

Z'£tt£hA,£^X s 7p 
LiWtZo 



■x^^-rs7t-7^U7: 

"tn^AsXTo X7°7-f V 
(F>m7r^M±?%t, VDPP 

XTte Xh, zcnmtt* 
3-TTo ^-Hlc7)P>x^ h 

£°- FZWil b<7)tzr>tzt>V 
tzfrh, ZTO0A-h'7i 



VDP* < PV>K?:S(t#lt 
•5 S T'CPU^^fc-lt 5 7 x- 

*?£frei:-fiz v T'tzblbK 

Z80T"ltll^T fc RBQOT'ttWlfr 
^L^ltT'Lj:? ^o(i°U 
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mtzJ^mmm 



12 SCREEN 5 <n=E- YX'^^-l 

— >£*7° : 71' Y-h=7— 7— 7*/U 
<7)*#?li s ^-A(£ <[Zvj.- 

■fZT\ ^^>RAM±(Z^7°^ 

VRAMC^T-Sk i:t^*a* 







lt;ilj7°P ?? A (7) 'J * h £ JLT 
<ft c *SPRDAT:*»lZ/\°? — > 

T KU^^HLUv7s^lZif§|rt-r 
3o ^LTXJ©I£CUv*?\ 
YJli^BUyX^, 7V-># 

-§-(*7°5-f h ®#-§-<d c £ £ ) 

£Dlxv7.?lZ^tlT*7°7--f h 
^[H fc Z <7)7°P ^7 A %-Hfi 1 L 

TSo *izJiKLfc-t>7 ;u7°p 
?7 AT'(i11#£ o? ^AW-,, 
tfijtz J: -3 T VDPtz T 7 K u * £!£:£ 

T5BIOS(0171H)4-1$-3Tl^S(73 

fettftC, ^>7°^7°P^7A 
COj^lZ *N0P"<7)t£%£\^/c-?A 



D 



;size 16*16 



;screen 5 

; call CHGMOD 

;y=-1 

;x=0 

:D=7* t-V 3 



IVi 1 } 1' or iL 

TEST: LD HL, 0F3E0H 
LD A. (HL) 
OR 0000001 0B 
LD (HL).A 
LD A, 5 
CALL 005FH 

LD B, -1 
LD C. 
LD D, 3 

LD HL, SPRDAT 
TEST1 : CALL SPRPUT 
INC C 

JR NZ, TEST1 
LD A, B 
ADD A, 4 
LD B, A 
CP 195 
JR NZ, TEST1 
RET 

: sprite data 



SPRDAT : 

DB 255, 230, 218, 176, 163, 143, 219, 189 

DB 190, 191, 191, 223, 207, 131, 144, 255 

DB 255, 103, 91. 13,197,241,251.253 

DB 253, 5,253,251,243,193, 9.255 

DB 15. 15. 15. 15, 15, 15, 15, 15 

DB 15, 15, 15, 15, 15. 15, 15. 15 



;x=x+1 

:y=y+4 



-J 

-J 

p 



i>HJ- 



SPRPUT: 



HL = IV H\V -7 Ml*) 7V 11 
B = y V v\ (-1 hi) 
C=X f'd (0 hi) 
D = V V-V A* yV 7 (0 hi 31) 

W 7.*- A XV j *V" V 7A 3h 

PUSH AF 
PUSH BC 
PUSH DE 
PUSH HL 



PUSH HL 

LD L. D 

SLA L 

SLA L 

LD H. 76H 

LD E. C 

CALL 01 71 H 

LD A, (0007H) 

LD C. A 

OUT (C) . B 

NOP 

OUT (C) . E 

NOP 

OUT (C) . L 

POP HL 

PUSH HL 
LD H. 
LD L, D 
ADD HL, HL 
ADD HL, HL 
ADD HL, HL 
ADD HL, HL 
ADD HL. HL 
LD BC, 7800H 
ADD HL. BC 
CALL 01 71 H 
LD A. (0007H) 
LD C, A 
POP HL 
LD B. 32 
OTIR 

PUSH HL 
LD H, 
LD L.D 
ADD HL. HL 
ADD HL. HL 
ADD HL. HL 
ADD HL. HL 
LD BC. 7400H 
ADD HL, BC 
CALL 01 71 H 
LD A, (0007H) 
LD C, A 
POP HL 
LD B, 16 
OTIR 

POP HL 
POP DE 
POP BC 
POP AF 
RET 



;7MJfc* i-hr-7** 



icall NSTWRT 

set [y] 
set [x] 
set [pattern] 

v' in-7-J-V h 



;call NSTWRT 



'M-f-T-% 



icall NSTWRT 
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of tware lontest 



;&hotr 



ipiOGEAM|fOUSE 

turbo Rli=fco£ora>fc? S^Wlzig 

CDte, -It* turbo R^ai, #£"££> 
MSXCIiMDfc<»<3&:«e<if3B:0*fo 



[»-* 



FANTASIA 

*KJff/Bfifttttf M8X3EKBU: 




>©RPG, r FANTASIAj/c 
&fW>fo!r b ifcgB L X fc Z -5 

*— V-»U + — £fclSS>3'f J*X-f 

-£WT£*i'>7° J E-KlzA£o 
? — >+— T-* + >-feJU#©T\ 

■y-fxAiaz/uttBi; 



** >7*^— KT*©PV> Mi 
St$s flfc& ilW* -fe-7'©4 
■fe-7*T-*-?t2, y- h&4 7s9 
C*©*£*#&i;©T\ &b?!r 

4b©#J8g(::LTfcUT(5U\, * 
ft£, €—7*13:1 *#tL*tT'#& 
lx7rCSt£oltJ:7 

3*3 «g.fc£±A&©:bl«S£Ji 
■5. C ^ A<T* # 3 A\ RPGT'fc £ i; 



«&©& 



&©=K> 



#©=H> 



±©=1-0 



7j<^;S6tt5 



HP, MPtflsK 



lllCDHSBK 



*SS?«ftS 



*©M^izai<fts 



^©«asizai<as 



«©*aic»<«:S 



€i] 



5©Ht 



>h 



^y^x- 



^-f-wtss 



30S1 



l©U-do 



mmh^mtt 



IfrbmUTDZ 



9m*9i£tttt&l\ 



)io(Dm%MDm% 



ytcDmz^zz 



JQIU&Uttex&U 







^il 



*MSXV ■%*> > • V 7 h 7 x 7 • 

* U v^;U7°P <? =7 A £^S L X 
t^Sto «fl4^p B pt= tt ^? > 7° 
U507JR o ¥LT£2J& ^3JS 

izxnLtzfF&izi,^ *tv?n3o 

7JR £ 1 07JPW.i f)ti§:i: Cfc 

gfc, Zftb©A»L/c#H n p£ 

BS#x *©F*9§&«L.i?\ ¥ 



L Tlffrc& 3 £ M#) b nfcffc?q 
»(100 7JR)$rIfU, W&Wtl 



(2)y-A7°P^7Agl5P1 



• MSX1 /i^ibilffilJ*. i.r>tm*b-b 

^•©HP^MP©(5ASZ, ^CON*£L> 
=1 >-tz > h U— v a > (^t^)© 
Sett 5 £ tzA,tzA,Ttf-oX < S„ 
Lt-5©T\ ^tt#^-(Ctar5S 



P K A -< X £ 



fc* «czl:£tf) 

-tz*©^£, t£frt£fr(F>bMz£ 



Msxv#v>i,iii"e*i*n?# s t> 

©, fcj: #**»/*- vi5^ ifc 
ttTAKERUT*I&7cT"# £ fc©(zP^ 
U*To */=, AilfF©^m#«, 

<T)Z£Wh, 1&A©7°P^*7A 
©^§15, 3l(i-g|S^Pt:°-Lfcfc 
©^ na*SSS(i@ < fcWf *J t>fc 
L2To 

•fc:#7j>£ j^^f^p D pWi, ^ 

®7°P ^*7 A ^-IBif L fc ^ 7*-f T 7 

(7Q7t-f^^^t7 hx 

©MSX, MSX2, MSX2+ N turbo R 
©SIJo 'J&gRAM N VRAM©^7F H 



FIRE 




STOP 




ICE 




HEAL 


HP?rft^iT-|Hia[-r-5o 


RETURN 




SPELL 




POISON 





£ H ^ (*-VF-y^ ^ RPG 
^<7)T^C?LTS^SfcH-7 4" 
^©MSXxi-^^iiiflzA^T 
l ^ S © TiS^T-<^T *> J: — 1?\> \ 

&izfSgBte<nii\ v - y y© A # 
$ £ mm tzo £izfr<^y -ffitfc 

rrsL, mmb^tv-£^mm 



lo $3. -^n^b lCTRL[ ^-^ffL 

^©T'^ilfc'it^o 

^^54. iSt>-7J?rlr2ttLfct)© 

^SftA©ft^fx ft« ) £TO L fc fe 
© (feflFf N R;^ (z tt^t* 7 U #f ?r 
OltT < fc*i*0) q J&:fc\ 20^*;^ 
©^tt. ^^^©^©^M^Slts 

i^#©73©f±^f, ft« x mis# 
^-fcBjieLT<^$u 



S=r107-24 J 

«s?a»iEaiitiu6-ii-i | 

7NU-I7S»Ut:JL/ gj 

(SO 33^*- g 

7C V7SOxP • D>xXhi 1 



"C 
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Z>a-+rX&5k- A« 






Xlfli * 



DURL 



ft#57JR 



$T» 7<f7 tfWTtt ft I N o V 
«fcfco T\ «fc<T*£fcffc&<7)— 81 



MSX2 VRAM64K 

UX SIS 138^— ^ICJS« 



*- £ fc tt v a -f *X -f y * Tift 
#fc l>fc * +- 7 * ? - £_bT:fe& 

tzifJB&tfih* £ 3 * J T^gf 







ttnmz&z-fis- i-tff) v am , 








^T^^^o 



*b07KAW7 



zcop-t- iz^ibtiT < %?- 
ab;u— jua^t-ra®*'** few 

*«^<x y-A<7)te**H-fl>Cft 

Z <7>y— AtiiS^cftiatffci. w 
T\ MftzmMZ$:%LlsbZ>(F>rf 




lis yi^— \'-* < **l®*T»# 
fc < ££;©»}#/::-&£ «t ^ flv< 
7 >*£■?•* ::££<£„ 



A1$,A2$,B1$ W^JHUffl 

Bl ^b-KCDU 

B2 ^Ufc^b-KCD» 

ci 7.ou-)\><mn 

CX.CY.CM +1»^ 2* -©a 

e-5t©ffli 

MQ.MW tt^<< S©&Kl7?lq] 
MS 5*UfclsItt 
P96(n) *i»5**-**ffl 
S *-A*Jffl 
SM *x-y» 

x,y x^-rh©®* 

M$ Xt—V®? 1 -* 
SP$ X^^fhSRffl 
C1$,C2$ X^-fhfefSS 



?Tl 



10-110 



m 



120-190 X^-yCDfffiK 
200-360 *-f>Jb— 3=-> 
370-380 £7E©7b-h£S3^-5 
390 aHbfctZ-SCSl^b- 

400-420 $)}$km<D9!m 
430-470 *1»^£*-©»n 
480-500 7b-h©X^a-,IU 
51 0-540 53.Ufc<?:*©©g 
550-570 ^x- y^U^-OaBl 
580-660 x>T*-f >?©$fl® 
670-1020 *1>^?*— 7 s -* 
1030-1130 Xx-yf-^ 
1140-1160 X»y1z— ^y— * 
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t£37*R 



RUSH 



mm. 






MSXE VRAM64K 

U7SB:]4D^-yc 



IMSX^-Uof 




• ^•A^j:A\f.-7/-c^rfi]t-l(It^T < n#i> 



MSX-<- L oS^'J^^l^ * 
— #— h\ va^7f-f7^ ©i^ 

«so -s © v j. — T- -< > Vf—L. 

tliiSoT, Z©y— AT(£g« 

£iffi3P > h □ —ivt^z. t ijt 

§#i\, ^^oTSfFt3©*r 

tint ±te®£&3H-M7!ri±T 

^-©TMrg^-f^b-tt-^T 




3>£-#TAl! ©tt&fe* 



KANDHh*^-) 






fc/{X»l/£fi?UTl^ < <r— A„ (& 



CLT^l<T^<~£fc*i?£\ ^n 
fcftfTtt -f v <f g\ y— AttsWB 



tfel*©^*-^ 
Stt©8t75|q|©$«« 



w x^-ya 

S *-A2)ffl 

Y JttiS©Yffi 

F 

D 

E 

U 

J 

Z(n) 3$##satenrU5fr£5 

M(n),N(n) 3f©JHl 

v(n),Y(n) mcDmm 

R(n) Sfc©*£K« 
SA.SB.SC.SD <ang©ti};ft 



•f^X-f V> Tift® £££(::» 
•^ffl.m^tiTl^^; 



?T 



10-140 

150-290 

300-330 

340-390 

400-460 

470-520 

530-570 

580-620 

630-650 

660-680 

690-710 

720-730 

740-750 

760-900 

910-940 






wcom. 



^utt©©*! 




• tzA,tzA,M<n%&bi&L < 'i'oT< 5 C 



ffl# 



6 0) T 7 K A -f X 



y-A^Afcltt^c fci& Zi 
tWI'J^UT&St^ tin ©# 



z©y— a« 

■¥*ie; ^>jl— T-'Oiff— Afz 

TSiUfex feot-»7°JK:, 




fts^^^r-^i! 



W#**lfc'\°*.>U(7)_t£ % |@g(t ^^fc'^fcfrfc,, 



| &s/»ju©fc©r : fe/) x 3:U3:i* 

A*, «*L/5L\7 7 'l'7 t 7©f^SA' 1 

!lur<fc'£ivteo 

ICIS575R, ^3^IC375P3, Sf^ 
ICIS1 75R©S^^J>SJAlM\fc 



a*. igfl^>fftis£©-f 

:J3^»<fctrl>o 






=107-24 
m«iC^ESSliJ6-11-1 
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h°m>% 



UXK^-^ 




DURL 



C D U R L ] 3 ) 



BY HIDEYUKI 



1, 1 :CLS: 



10 ' C C 
YAMADA 

20 ' {{{ Va*t'vf< }}) 

30 CLEAR300: SCREEN 5 , 2 : COLOR 15 

DEFINT A-Z:DIM P%(65 ) : SM=1 : MS=0 

40 OPEN"GRP : "AS** 1 : DEFFNPOC XX , YY )=PO I NTC X 

X#16,YY*16) 

50 FORI=0TO3 1 : D=VALC "&H"+MIDS< "000000004 

1072 107070007025 10107036202640240037 1070 

104650227037707", 1*2+1 , 2 ) ) : VPOKE&H7680+ I 

, D : NEXT : COLOR=RESTORE 

60 FORI=0TO3 1 :SPS=SPS+CHRS(VAL("&H"+MIDS 

<"0307070D0703 1F3F6F4F070F1F06 1E00C0E0E0 

B0E0C0F8FCF6F2E0F0F8607800", 1*2+1 , 2))):N 

EXT I : SPR I TES C ) =SPS 

70 C1$=CHRS< 10):C2S=CHR$C 1 1 ) : COLORSPR ITE 

$< ) =C 1 S+C 1 S+C2S+C2 $+C2 S+C2 $+C 1 $+C 1 $+C 1 $ 

+C2S+C 1 $+C 1 S+C 1 S+C2S+C2S+C2S 

80 FORI=0TO6:P%C0)=16:P%< 1 ) = 16 : FORJ=2T06 

5 : RE ADDS: P%< J )=VAL( "&H"+DS) : NEXT 

90 COPYP% , 0TOC I * 1 6 , ) , 1 : NEXT 

100 COLOR=< 15,0,0,0):PRESET(70,90):PRINT 

** 1 , " t ( C D U P. L 3 ) ) " 

1 10 FORI=0TO6:FORJ=0TO4:COLOR=C 15,0,1,1) 

: NEXT J , I 

120 ' ill 7.t- 5 J- y-h" & t»W >}} 

130 READMS,B1 

140 PRESET (62, 186 ) : PRINT**1 ,USING"STAGE ** 

**"; SM 

150 PRESETC 134, 186 ) : PRI NT**1 ,USING"MISS ** 
MS 

FORI=0TO9 : FORJ=1TO10 : COPYC 80 , )-(95 , 
1TOC 16*1+48, 16*J), 1 : NEXT J, I 
X=4 : Y=9 : L=0 : B2=0 : FOR I =0TO7 : FORJ=0TO7 

:L=L+1 :CH=VAL(MIDSCMS,L, 1 )) 

180 COPYC 16*CH,0)-<: 16*CH+15 

+64, 16*1+32), 1 : NEXT J, I 



****" 
160 
15) 
170 



15), 1TOC 16*J 



190 COPYC 48, 16)-C207, 175), 1TOC48, 16),0 

200 ' £{£ >'<>Jl--f> }}> 

2 1 PUTSPR I TE0 , C 1 6*X , 1 6*Y ) : S=ST I CKC )ORS 

TICKC 1 ):XX=X+CS=7)-CS=3):YY=Y+CS=1 )-CS=5 

): IFSTRIGC0)ORSTRIGC 1 )=~1THEN520 

220 IFS=0ORS=2ORS=4ORS=6ORS=8THEN2 10ELSE 

PX=0 : PY=0 : GOSUB380 

230 I FPO=6THEN2 1 0ELSE I FP0=4THENG0SUB4 1 : 

GOSUB390 : X=XX : Y=YY : GOT02 1 

240 IFPO=10THENGOSUB410:GOSUB390: IFB2=B1 

THEN560ELSE520 

250 PX=7:PY=13:GOSUB380: IFPO=6THEN260ELS 

E280 ' {£{ Duwn }}} 

260 G0SUB4 1 : GOSUB390 : GOSUB420 : CX= 1 44 : CY 

=159: CM= 1 6 : GOSUB440 : MW= 1 : C 1 =- 1 

270 GOSUB500:GOSUB460:X=XX: Y=YY+1 : IFY>9T 

HEN520ELSE2 10 

280 PX=7 : PY=2 : GOSUB380 : I FPO=6THEN290ELSE 

3 10 ' Hi Up }}} 

290 G0SUB4 1 : GOSUB390 : GOSUB420 : CX=32 : CY= 

47 : CM= 160: GOSUB440 : MU=- 1 : C 1 = 1 

300 GOSUB500:GOSUB460:X=XX: Y=YY-1 : IFY<2T 

HEN520ELSE2 10 

3 10 PX=13:PY=7:GOSUB380: IFPO=6THEN320ELS 

E340 ' Hi Right )}} 

320 G0SUB41 : GOSUB390 : GOSUB420 : CX=176 : CY 

=19 1: CM=48 : GOSUB450 : MW= 1 : C 1 =- 1 

330 GOSUB490 : GOSUB470 : X=XX+1 : Y=YY: IFX> 1 1 

THEN520ELSE210 

340 PX=2:PY=7:GOSUB380: IFPO=6THEN350ELSE 

2 10 ' CtC Left }}} 

350 GOSUB410 : GOSUB390 : GOSUB420 : CX=64: CY= 

79 : CM= 192: GOSUB450 : I1UI=- 1 : C 1 = 1 

360 GOSUB490 : GOSUB470 : X=XX- 1 : Y=YY : I FX<4T 

HEN520ELSE2 10 

370 ' {{{ POINT COLOR 



380 PO=POINTCXX*16+PX 



} )} 

YY*16+PY): RETURN 
COPYC80,0)-C95, 15) 
RETURN 



390 B2=B2+1:FORI=0TO1 

, HOC 16*X, 16*Y), I :NEXT 

400 ' {{{ SOUND }}} 

410 FORI=0TO13:OT=VALC"&H"+MIDS("F60 1F50 

1F40 10F38 10 10 10640000", 2*1 + 1 , 2 ) ) : SOUND I , 

OT : NEXT : PUTSPR I TE0 , C XX* 1 6 , YY* 16): RETURN 

420 PLAY"O4V5L64CV6CV8CV10CV1 1CV12CV13CV 

13C", "O5L64V6C<v , 7DV8EV9FV10GVl 1AV12B":RET 

URN 
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430 ' £{{ COPY }}} 

440 COPY C XX* 1 6 , CX )-C XX* 1 6+ 1 5 , CY ) , 1 TOC XX* 

1 6 , CM ) , 1 : RETURN 

450 COPYCCX,YY*16)-CCY, YY*16+15), 1TOCCM, 

YY*16), 1 : RETURN 

460 COPYCXX*16,32)-CXX*16+15, 159),0TOCXX 

* 16, 32), 1 : RETURN 

470 COPYC64,YY*16)-C 19 1 , YY* 16+15 ), 0TOC 64 

, YY*16), 1 : RETURN 

480 ' {{{ SCROLL }}} 

430 FORI=1TO16:PUTSPRITE0, CXX*16+MUI*I , YY 

*16):C0PYC64+C1*I , YY*16)-C 191+C1*I , YY*16 

+ 15), 1 TOC 64 , YY* 1 6 ) , : NEXT : RETURN 

500 FORI=1TO16:PUTSPRITE0, CXX*16 , YY*16+M 

W*I ):COPYCXX*16,32+Cl*I >-< XX* 16 + 15, 159+C 

1 * I ) , 1 TOC XX* 1 6 , 32 ) , : NEXT : RETURN 

5 10 ' CCC MISS }}} 

520 PRESETC84,96):PRINT*1 ,"{ M I S S }": 

MS=MS+1 

530 PLAY"V13L805B4B4FEDCDC", "V12L806G4G4 

DC05BABA" , " V 1 1 05L8FEDFEDFEDD" : GOTO 1 40 

540 FORI=0TO15:PUTSPRITE0, CX*16+MC*I , Y*l 

6+CM* I ) : FOR I =0TO200 : NEXT : NEXT : RETURN 

550 ' {£{ CLEAR }}} 

560 PRESETC84,96):PRINT81 ,"C CLEAR ! J": 

PLAY"V1 105L9EEFGG", "V1206L16EFEFGAGAGG" 

570 SM=SM+1 : IFSM=1 1 THEN580ELSE 130 

580 ' £{{ ALL CLEAR }}} 

590 FORI=0TO699:NEXTI : PUTSPR I TE0 , C 0,2 12) 

: PRESET C 62, 186 ) : PRI NTtt 1 ,SPCC 17) 

600 FORI=0TO9:FORJ=1TO10:COPYC80,0)-C35, 

15), 1 TOC 16*1+48, 16*J), 1 : NEXT J , I 

6 10 FORI=0TO9:COPYC96,0)-C 111, 15), 1 TOC 16 
*I+48, 128), 1 : NEXT I 

620 SETPAGE0, 1 : L I NEC 64 , 64 )-C 191,111), l f B 

F:C0PYC48, 16)-C207, 175), 1T0C48, 16), 

630 CLS:FORI=0TO6:READES,E1 , E2 : PRESETCE1 

, E2 ) : PR I NTH 1 , ES : NEXT I : SETPAGE0 , 

640 A1S="L8S1M30000O5FGA2.B4O6C2.O5AGA1 . 

FAG1E1FEF1D1":B1S="L8S1M30000O4FGA2.B4O5 

C2 . 04AGA 1 . FAG 1 E 1 FEF 1 D 1" : A2S="EFG 1 E 1 FEF 1 D 

1" 

650 PLAYA1S:FORI=0TO134:COPYC62, I >-< 189, 

47+1 ), 1TOC64,64),0: IF I=55THENPLAYA IS, Bl S 

: PLAYA2S , A2S : NEXT I ELSEFORJ= 1 T0229 : NEXT J , 

I 

660 GOTO660 

670 ' {{( ++399f*r9 }}} 

680 DATA CCCC,CCCC,CCCC,CCCC,33C3,3333,3 

333, 3C33,32C3, 2622, 2262, 3C23, 2 2C3, 6822 

690 DATA 2286, 3C22.22C3, 8926, 6298. 3C22, 2 

2C3, 9968, 8699, 3C22,26C3, 8968, 8698, 3C62 



700 

298, 

710 

2C3, 

720 

CCC, 

730 

333, 

740 

2C3, 

750 

298, 

760 

2C3, 

770 

CCC , 

780 

333, 

790 

2C3, 

800 

999, 

810 

2C3, 

820 

CCC, 

830 

333, 

840 

6C3, 

850 

993, 

860 

2C3, 

870 

CCC, 

880 

555, 

890 

745, 

900 

EEE, 

910 

745, 

920 

444, 

930 

888, 

940 

968, 

950 

DDD, 



DATA 

3C22, 

DATA 

8926, 

DATA 

CCCC 

DATA 

3C33 , 

DATA 

8926, 

DATA 

3C22, 

DATA 

6822, 

DATA 

CCCC 

DATA 

3C33, 

DATA 

8668, 

DATA 

3C99, 

DATA 

6222, 

DATA 

CCCC 

DATA 

3C33, 

DATA 

6666, 

DATA 

3C86, 

DATA 

2222, 

DATA 

CCCC 

DATA 

5455, 

DATA 

EEEE, 

DATA 

5477, 

DATA 

7777, 

DATA 

4444 

DATA 

8688, 

DATA 

DDDD, 

DATA 

8699, 



22C3 

22C3, 

6298 

6298, 

33C3 

CCCC 

32C3, 

6298 

6298, 

22C3 

26C3, 

8699 

2286, 

33C3 

CCCC- 

32C3, 

2222 

6666, 

68C3 

26C3, 

6666 

2222 

33C3 

CCCC 
32C3 
2226 
8668 
99C3 
88C3 
8668 
2226 
33C3 

4444 
7745 
7777 
EEEE 
7745 
7745 
EEEE 
7777 
5545 

6666 
9968 
9999 
DDDD 
9968 
9968 



8926, 6298, 3C22.22C3, 8926, 6 
8926, 6298, 3C22.22C3, 8926 
3C22,22C3,8926,6298,3C22,2 
3C22.32C3, 8926, 6298, 3C23 ' 
3333 , 3333 , 3C33 , CCCC, CCCC, C 



CCCC, 
8926, 
3C22, 
3C22, 
8926, 
8968, 
3C22, 
3C22 , 
3333, 

CCCC, 
2222, 
3C22, 
3C66, 
9999, 
8889, 
3C66, 
3C22, 
3333. 



CCCC 

6298, 

22C3 

22C3, 

6298 

8698, 

22C3 

32C3, 

3333 

CCCC 

2222, 

22C3 

26C3, 

9999 

8888, 

22C3 

32C3, 

3333 



CCCC 

3C23, 

8926 

8926, 

3C22 

3C62, 

3926 

2622, 

3C33 

CCCC 

3C23, 

6226 

8889, 

3C99 

3C88, 

6226 

2222, 

3C33 



33C3 
,22C3, 
,6298 
,6288, 
,22C3 
,22C3, 
,6238 
,2262, 
, CCCC, 

, 33C3 

,22C3, 

.2222 

,8888, 

, 68C3 

,22C3, 

,2222 

,2222, 

, CCCC 



CCCC, CCCC 

2222,2222, 

3C22.22C3 

3C22.88C3, 

9999,9999 

8888,9888, 

3C22.22C3 

3C22.32C3, 

3333,3333 



CCCC, 
3C23, 
2222, 
8888, 
3C86, 
3C62, 
2222, 
2222, 
3C33, 



33C3 
22C3 
6226 
9888 
99C3 
66C3 
6226 
2222 
CCCC 



4444 
7777 
5477 
5477 
EEEE 
EEEE 
5477 
5477 
5555 



4444 

7777, 

7745 

7745 

EEEE 

EEEE, 

7745 

7745, 

5555 



4444 
5477 
EEEE 
EEEE 
5477 
5477 
EEEE 
7777 
5455 



,5545 
,7745 
, EEEE 
, EEEE 
,7745 
,7745 
,EEEE 
,7777 
,4444 



6666,6666,6666,8868 
9999,9999,8699,9968 
8699 , 9968 , DDDD S DDDD 
8699 , 9968 , DDDD ,*DDDD 
DDDD, DDDD, 8699, 9968 
DDDD, DDDD, 8699, 9963 



3333,3 

8926 

3C22.2 

3C22 

8326,6 

9968 

3C22,2 

3C23 

CCCC,C 

3333,3 

6222 

3C22.-2 

3C88 

9999,9 

8668 

3C22,2 

3C23 

CCCC.C 

3333,3 

2222 

3C22,6 

3C62 

9999,9 

6666 

3C22,2 

3C23 

CCCC.C 

5555,5 

7777 

5477,7 

5477 

EEEE.E 

EEEE 

5477,7 

5477 

4444,4 

8888,8 

9999 

8699,9 

8699 

DDDD,D 

DDDD 
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DDDD 


8693 


9968 


DDDD 


DDDD 


8699 


9 


3939 


8699 


9968 


9999 


9999 


8699 




88G8 


8888 


8888 


8688 


6666 


6666 


6 



AAAA, AAAA, AAAA 
BAAB,88DA, 1D86 
6 188,BAAA, AAAB 
6638, BA1D, AAAB 



AAAA, BBAB, BBBB, B 
BAAB, AAAB, 33 A8 
DD83,6638,BA1A,D 
3388, 6688, BAl'A 



DATA 

3333, 

DATA 

6666 

DATA 

BABB, 

DATA 

DD83, 

DATA AAAB, 8868, 6686, BA1 A, ADAB.66A6, 
, BADA , AEAB , 66EA , 1 E66 , BAEA , A7AB ,7777 

DATA 7777,BA7A,A5AB,5555,5555,BA5A, 

4444 , 4444 , BA4A , BAAB , AAAA , AAAA , BAAB 

DATA BBAB , BBBB , BBBB , BABB , AAAA , AAAA , 

AAAA 

' £{{ STAGE DATA }}} 

DATA 5 44444350544435440543544440564 
4444405 1 44444525 144452445 145244445 , 43 
1050 DATA 552445556545442544545554434405 
4444444455444410444054455440445444,44 
1060 DATA 044444444445544445452455450 134 



360 

368 

370 

666, 

380 

BBB, 

330 

AAB, 

1000 

6166 

1010 

A4AB 

1020 

AAAA 

1030 

1040 




RUSH 



10 ' 

20 ' 1330 /9 

30 ' RUSH C5vS>a3 

40 ' BY SHIMIZU 

50 ' 

60 ' £<M1 

70 OPEN"GRP : "FOROUTPUTAS** 1 : DEF I NTA-2 : DEF 

SNGU 

80 COLOR 15,1,1: SCREENS , 2 : SETBEEP3 : KEYOFF 

30 FORI=0TO24:DRAW"C4BM=I ; , 150U100R50D50 

L50F50C10BR10BU100D100R50U100C6BR60L50D5 

0R50D50L50C12BR60U100D100U50R50D50U100BM 

113, 160": NEXT: PRINT*!, "?"ji>3." ;SPC(55 ) ; "PU 

SH SPACE KEY":H=0 

100 W=0:S=STRIG<0)+STRIGC 1 ) : IFS=0THEN100 

1 10 ' 

120 CLS:W=W+1 : IFWO5THEN140 

130 SCREEN 1 :WIDTH32: LOCATE 10, 10: PRINT "HA 

PPY END"SPC( 50 :> "PROGRAM BY SHIMIZU": END 

140 DRAWBM100, 100" : PR I NT** 1 , "7.f-V "UI:FOR 

I=0TO2000:NEXT 



5545020455453454550425544443464442 , 45 
1070 DATA 444444444134426444444444434454 
2443444424444444444034420444444444,62 
1080 DATA 554434555545554555444545544445 
1544444425044454444444335645544455,39 
1030 DATA 544545554624455543455055344404 
554442435545 1444454450445044245444,42 
1100 DATA 355544554543446544445444454555 
5444441544404445440445343444554553,43 
1110 DATA 655554155555424455541405554243 
455414045544434555 1404555543455555,32 
1120 DATA 445555554441455515044451151454 
0445244524504544455445504544434456 , 40 
1130 DATA 445554454443454454444345541555 
5 15 1044445644404455 414502 544405555,41 
1140 ' {{{ DATA }}} 

1150 DATA CCC D U R L n ) , 67 , 47 , CONGRATU 
LAT IONS! ,63,71 , ALL STAGE CLEAR!, 63, 87 
1160 DATA 1330 , 87 , 135 , Programed , 35 
, 15 1 ,by , 1 13, 159, HIDEYUKI YAMADA.7 1 , 175 



150 •' K X> taW 

160 CLS: Y=0:GOSUB700:PAINTC 128, 200), 3 
170 COLOR=C 1,2,1 , W):DRAW"BM35, 171": PRINT 
**1 , "7.f-V "W 

180 DRAWC4BM1 10, 1 80R50D7L50U7L16 ": PRINT 
**1 , " D":DRAU"C4BM30, 183R30D7L30U7L16" : PR 
INT**1 , " f":DRAW"C4BM70, 138R1 30D7L130U7L1 
6" : PR INT** 1, " f" 
130 ' V3^t"jf< 
200 _TURBOONCW,H> 

2 10 DIM NC2),MC2),ZC2),XC7), YC7),RC7):FO 
R I = 1 8 1 TO 1 33STEP3 : PA I NTC 1 30 , I ) , 4 : NEXT I 
220 ' 7.7°5-fh 
230 F=3l : RESTORE 
30:SPRITE$C I )=SS: 
240 ' 13?- 
250 B=0:C=0:F=l5 



FORI=0TO5 
NEXT I 



READD$:GOSUB7 



FOR I =0TO2 : READDS : GOSUB7 
30 : FORK=0TOC : COLORSPR I TE$C B )=SS : B=B+ 1 : NE 
XTK:C=C+1 : NEXT I 
260 ! *?- 

270 F=15:RESTORE870:FORI=0TOW-1 : READDS :N 
EXT I : GOSUB730 : FORK=3T05 : COLORSPRITE$CK) = 
SS:NEXTK 

280 ' ^W-.O Vz* 

230 F0RI = 1T02:ZC I )=0:MC I )=-13: NEXT I :FORI 
=3T05:YC I )=0:NEXTI : J=120 : Y=0 : XC3 )=64: XC4 
)=128:XC5)=192:U=0:D=51 : E=9 1 :F=131 : ONSPR 
I TEGOSUB540 : SPR I TEON 
300 ' i>~ X> 
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310 S=STICKC0)+STICK<1) 

320 IFY<=50THENIFS=7THENY=Y+2:LINEC0,Y+1 

54)-C 128, 154),0:LINEC0,Y+153)-C 128, 153), 

0:GOSUB700 

330 IFY>=-50THENIFS=3THENY=Y-2:LIt-4EC 128, 

154)-(256, 154-Y),0:LINE( 128, 153)-<256, 15 

3-Y).0:GOSUB700 

340 .' iT* 

350 U=U+CY/-150): IFU>8THENU=8ELSEIFU<-8T 

HENU=-8 

360 J=J+U*2 : K=-C C Y*2 )/256 )*J+Y+ 1 40 : PUTSP 

RITE0, <J-8,K>, ,0 

370 IFJ<8THEN:U=U*-1-1 

380 IFJ>255THEN:U=U*-1+1 

330 IFJ<8THENJ=10ELSEIFJ>255THENJ=253 

400 ' 91 

410 S=STRIG<0)+STRIGC 1 ): IFS=0THENSS=0 

420 IFSS=0THENS=STRIGt0)+STRIG( 1 ):Z=ZC 1 ) 

+ZC2): IFZ<2ANDS=-1THENSS=1 :Q=Q+1 :NCQ)=J- 

8:MCQ)=K:Z(Q)=1 : IFQ=2THENQ=0 

430 S$=INKEY$: IFSS="E"THENEND 

440 F0RI=1T02: IFZC I )=0THEM460ELSEMC I )=MC 

I )-8:PUTSPRITEI , CNC I ) , MC I ) ) , , 1 

450 IFMC IK-24THENZC I)=0 

480 NEXT I 

470 ' ?* 

480 F0RI=3T05:RCI )=RC I )+<RND(l )*W*2)-W: I 

FRC I X-8THENRC I )=-8ELSEIFRC I )>8THENRC I ) = 

8 

480 X( I >=X< I )+RC I ): Y< I )=Y< I )+l :PUTSPR1TE 

I, (XCI),YCI)), ,UI+1 

500 P=POINT(X( I )+8,YC I)+16): 1FP=3THENXCI 

)=RND( 1)*256:YCI)=-7:GOSUB670ELSEIFX< I)> 

247THENXC I )=10ELSE IFXC I X9THENXC I )=246 

5 10 NEXT I 
520 GOTO 310 

530 ' ?9>)>Y;t-< 

540 SPRITE0FF:F0RT=1T02:F0RL=3T05: IFXCL) 

- 1 6 <NC T ) ANDNC T XXC L ) + 1 6 ANDYC L )- 1 6 <MC T ) AN 

DMCTXYCD+16THEN590 

550 NEXTL:NEXTT 

560 FORL=3T05: IFX(L)-16< J-8ANDJ-8<X<L)+1 

6 ANDY C L ) - 1 6 < KANDK < Y< L >+ 1 6 THEN6 40 
570 NEXTL : SPR I TEON : RETURN 

580 ' tt/9" A-WnV 

590 SA=31 :SB=135:SC=0:SD=50:GOSUB750 

600 MCT)=-20:XCL)=RND( 1 )*256: YCL)=-7 

6 10 F=F-1 :LINECF+70, 198 )-(F+70 , 205 ) , 8 : IF 

F=0THENH=1 :GOTO 920 

620 GOTO 550 

630 ' 3f*y**;t-£r 

640 SOUND0.200-D: SOUND 1 , : SA=13 : SB=128 : S 



C=1:SD=13:GOSUB750 

650 FORO=0TOUI:D=D-1 :LINECD+1 10, 180XCD+1 

10, 187), 8: IFD<=0THENH=0:GOTO 920ELSENEXT 

0:XCL)=RNDC 1 )*256 : YCL)=-7 : GOTO 570 

660 ' f *af JV X-iT 

670 SA=6 : SB= 1 35 : SC= 1 76 : SD=54 : GOSUB750 

680 FORO=0TOW:E=E-1 :LINECE+90, 189XCE+90 

,196), 8: IFE=0THENH=0:GOTO 920ELSENEXTO: R 

ETURN 

690 ' V *y SABU 

700 LINEC0,Y+156)-C256, 156-Y),3 

710 LINE<0,Y+155)-C256, 155-Y ), 3 : RETURN 

720 ' 7.7* 5YI" *)T 

730 S$="":FORJ=0TOF: A=VALC "&H"+MIDSCD$, J 

*2+ 1 , 2 ) ) : SS=S$+CHRSc: A ) : NEXT J : RETURN 

740 ' SOUND VJ~ 

750 SOUND6 , SA : SOUND7 , SB : SOUND 13,0: S0UND8 

, 24: SOUND 1 1 , SC: SOUND 12 , SD: RETURN 

760 ' DATA 

770 'SPRITE PATTRN 

780 DATA 81818181C3C363733F1F050B172B53A 

38 18 18 18 1C3C3C6CEFCF8A0D0E8D4CAC5 

790 DATA 0F3F3F7F7F7FFFFFFFFFADADADADADA 

DF0FCFCFEFEFEFFFFFFFFB5B5B5B5B5B5C5 

800 DATA 070F0F1F77EFF6FBFFFF773B1C0F0F0 

7E0F8FC8EF6FBFFFFFEFEFE7CFCFCF8C0 

810 DATA 00070F0F1F19191F1F7FFF1E1E1E0C0 

000E0F0F0F89898F8F8FEFF7878783000 

820 DATA 00000000386CCEDEFF7F39000000000 

000000000 102060C0DFFFF81F00000000 

830 DATA 080808080402 18 1E7FFFEFCF8F1F3E7 

10 10 10 102040 1878FEFFF7F3F2F87C0E 

840 'SPRITE COLOR 

850 DATA 090909080808060606060F0B0A03020 

C 

860 DATA 0F0F0B0B0A0A0A09090909080806060 

6 

870 DATA 0E0E0E0E0B0B0B0B0B0B0A0A0A0A090 

9 

880 DATA 0A0F0F0B0B0A0A0A0A0505060609090 

2 

890 DATA 020202020F0F030302020C0C0202020 

2 

900 DATA 0F0F0E0E05050808040405050707030 

3 

910 ' 9l»7- 

920 _TURBOOFF 

930 I FH= 1 THENFOR I =0TO3 : BEEP : NEXT : SCREEN5 

: GOTO 1 20ELSEFOR I =0TO50 : SA= 1 5 : SB= 135: SC= 

176: SD=54 : GOSUB750 : NEXT I 

940 SCREEN1 :LOCATE10, 10 : PRINT"GAME OVER" 

:FORI=0TO3000:NEXT:GOTO 80 
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